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'♦b Tn02 DRIVE FUNCTION TlflER PPGE 2 

i*^ TRBLE OF CONTENTS 

^9 

50 TRBLE OF CONTENTS 

61 

52 

53 

5H RBSTRflCT 
55 

5b CHRPTER 1 REQUIREnENTS 

57 

5S 1. 1 EQUIPnENT 

59 

bO 1 2 HEnORY STORRGE 

bl 

b: 1 3 PRELiniNRRY PROGRRHS 

b2 

CHRPTER 2 LORDING RND STARTING PROCEDURE 

b5 

bb 2 1 RCTll OPERRTION 

b7 

b8 CHRPTER 3 SUITCH SETTINGS 

b9 

70 CHRPTER H ERRORS 

71 

72 «♦ I ERROR TYPEOUT FORHRT (HRRDHRRE) 

73 

7H H 2 ERROR TYPEOUT FORMAT (FUNCTION OUT OF PRN6E) 

75 

7b CHRPTER 5 SUBROUTINE RBSTRflCTS 

77 

78 CHAPTER b MISCELLANEOUS 

79 

80 b 1 STACK POINTER 

81 

82 b 2 EXECUTION TIME 

S3 

S** CHAPTER 7 PROGRAM DESCRIPTION 

35 

8b 7 1 FUNCTION TIME DOCUMENT 

S7 

8S 7 2 TEST SEQUENCE / RELATED ADJUSTMENTS / ASSOflATED HARDWARE 

89 

90 7 3 TEST DESCRIPTIONS 

91 
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SEQ 0003 



92 Tn02 DRIVE FUNCTION TItlER PPGE 3 

93 flBSTRflCT 
«»^ 

96 

96 

97 

98 

99 
100 
lOt 
102 
103 
101* 
105 
10b 
10- 
108 
10? 
110 
Itl 
112 
113 
IIH 

lis 

116 RBSTRPCT 

117 

118 

119 

120 PROGRfltl OZTUG HEflSURES THE TIKE REQUIRED AND GAP 

121 SIZES PRODUCED BY THE Tt102/TE16 rWGTflPE 

122 DRIUE/SLflUE. 
123 

12H THE TEST HILL CHECK BOTH THE LOGIC GENERATED 

125 TIME DELAYS, AND THE DISTANCES TRAVLEO BY THE 

12b TAPE IN RESPONSE. 

127 

128 ACTUAL TAPE SPEED MAY ALSO BE CHECKED BY USING 

1:9 THE SPEED TESTS UITH AN 800 BP I SKEU TAPE 

130 

131 DEVICE ERRORS ARE CHECKED AND PRINTED AS THEY 

132 OCCUR. IF THE ERROR IS DATA RELRTED(PAR ITY; ETC) 

133 THEY ARE PRINTED AS SOFT ERRORS 
13«» 

136 IF THE TIME CHECK IS OUT OF RANGE. IT IS PPINTED 

13b PS AN OUT OF RANGE ERROR 
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SEQ 



137 Tn02 DRIVE FUNCTION TIHER PPGE H 

138 REQUIREMENTS 

li? 

mo 
\**\ 

ti*3 



m6 

160 
IS! 

is: 

153 CHfiPTER 1 

iSi* 

16S REQUIREMENTS 

ISb 

167 

168 

169 PDP-n FRUILY central processor UITH HK memory UITH up to bH TM02/TE16 
160 CONTROLLER/MflGTflPE STATIONS. 

161 

162 tXXPROGRRM CPN BE RUN ON R PROCESSOR THAT DOES NOT HAVE A HARDUARE SUiTCCH REGISTER 

163 A SOFTUARE SUITCH REGISTER (SWREG) LOC. 176 IS AUTOMATICALLY SELECTED(REFER TO 
16H CHAPTER 3 FOR DESCRIPTION OF HOU TO DYNAMICALLY LOAD LOC 176)m 

166 
166 
167 

168 1 1 OPTIONAL EQUIPMENT USED 

169 

170 1 NONE 
171 

172 
173 

17M 1 2 STORAGE 

175 

I7b PROGRAM LOADS AND RUNS IN THE FIRST HK OF MEMORY 

177 

173 

179 

180 1 3 PRELIMINARY PROGRAMS (TO ASSURE HARDUARE OPERATION) 

181 

182 riAINDEC-ll-02TUC CONTROL LOGIC TEST 

183 MAINOEC-ll-OZTUB BASIC FUNCTION TEST 
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l^^ Tn02 DRIVE FUNCTION TIHER PAGE 6 

18B LOADING AND STARVING PROCEDURE 

1S6 

18? 

188 

189 

190 

191 

192 

193 

19^ 

196 

196 

197 

19S 

199 

200 CHAPTER 2 

201 

202 LOADING AND STARTING PROCEDURE 

203 

20H 

20B 

206 THE PROCEDURE IS AS FOLLOUS 

207 

208 LOAD PROGPAn USING THE ABSOLUTE LOADER 

209 LOAD ADDRESS - 200 

210 SET OPERATING SU ITCHES 

211 PRESS START 
212 

213 **»IF THE SOFTUARE SWITCH REGISTER IS USED THEN THE PROGRAM UILL TYPE SUR=XXXXXX NEU= 

2m THIS UILL ALLOU LOC. 176 TO BE CHANGED BEFORE THE START OF THE TESTING (REFER TO CHAP 

215 

216 PROGRAM UILL REQUEST DRIVE (Tn02) AND SLAVE (TE16) NUMBERS TO BE 

217 TESTED TYPE DRIVE/SLAVE NUMBERS WITH A COMMA (,) BETWEEN EACH 

218 DRIVE/SLAVE TO BE TESTED 
219 

220 REQUESTS FOR TAPE SPEED TESTS AND NR2 ONLY MODE UILL BE MADE 

221 RESPONSE TO TAPE SPEED ONLY REQUEST UITH A ONE (1) UILL CAUSE 
2Z2 THE PROGRAM TO EXECUTE TEST 31 AND 32 ONLY. THIS IS THE ONLY UAY 
223 TO TEST TAPE SPEED. 

22H NR2 ONLY MODE UILL CAUSE THE PROGRAM TO SKIP THE 1600 BP I DATA TIME TEST 

225 TYPE CONTROL U ( U) TO DELETE LINE TYPED OR RU30UT TO DELETE LAST 

226 CHARACTER(S) 
227 

228 PROGRAM UILL PUBLISH TIMES REQUIRED AND REPORT ERRORS 

229 

230 

231 

232 2 1 ACTll OPERATION 

233 

23H IF THE PROGRAM IS RUN IN QUICK VERIFY MODE. FUNCTION TESTS ARE NOT 

235 ITERATED 
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23b Tn02 DRIVE FUNCTION TIMER PPGE 6 

73? SNITCH SETTINGS 

238 

239 

240 

241 

242 

243 

244 

246 

24 b 

24? 

248 

24' 

2&6 

251 CHRPTER 3 

2B2 

263 SUITCH SETTINGS 
264 

266 

256 IF THE DIOGNOSTIC IS RUN ON fl CPU WITHOUT ft SUITCH 

267 REGISTER THEN fl SOFTWARE SWITCH REGISTER IS USED WHICH HLLOUS 

268 THE USER THE SRHE SWITCH OPTIONS RS THE HRRDWRRE SWITCH REGISTER 

269 IF THE HRROURRE SWITCH REGISTER DOES NOT EXIST OR IF ONE DOES 

260 RND IT CONTRINS RLL ONES i\77777) THEN THE SOFTWRRE SWITCH 

261 REGISTER (LOC 176) IS USED. 
262 

263 

264 CONTROL- 
266 

266 THIS PROGRRn RLSO SUPPORTS THE OYNRMIC LORDING OF THE SOFTWARE SWITCH 

267 REGISTER (LOC 17b) FROM THE TTY THIS CRN BE RCCOHPLISHEO BY 
2b8 DOING THE FOLLOWING: 

269 

270 1) TYPE CONTROL G < G>; THIS WILL ALLOW THE TTY TO ENTER DRTR INTO 

271 LOC. 17b RT SELECTED POINTS WITHIN THE PROGRAM 

272 

273 2) THE MACHINE WILL THEN TYPE: SWRsXXXXXXNEW= (XXXXXX IS THE OCTAL CONTENTS 

274 OF THE SOFTUARE SUITCH REGISTER ) 

276 

27b 3) AFTER THE "NEU=" HAS BEEN TYPED THEN THE OPERATOR CAN DO ONE 

277 OF THE FOLLOUING AT THE TTY: 

278 

279 A) TYPE A NUMBER TO BE LOADED INTO LOC 17b FOLLOWED BY R <CR> 

280 (ONLY NUMBERS BETWEEN 0-7 WILL BE ACCEPTED RND ONLY 6 NUMBERS 

281 UILL BE ALLOWED) 

282 IF A <CR> IS THE FIRST KEY DEPRESSED THE SOFTWRRE SWITCH 

283 REGISTER CONTENTS WILL NOT BE CHRNGED 
284 

286 B) IF R CONTROL U < U> IS DEPRESSED THEN THE PPOGRRM WILL SEND YOU 

28b BRCK TO STEP 2 

287 

2S8 
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289 
290 
291 
292 
293 
29H 
295 
29b 
297 
298 
299 
300 
301 
301 
303 
30«» 
305 
306 
307 
308 
309 
310 
311 
312 
313 
31H 
316 
316 
317 
318 
319 
320 
321 

323 
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H 
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1 

09 
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SEQ 0007 



SU15 
(lOOQQO) 



HRLT ON ERROR 



sum 

(040000) 

SU13 
(020000) 

sun 

(004000) 



SUlO 
(002000) 



SU09 
lOOlOOO) 

SU07 
(000200) 



LOOP SUBTEST 



THIS SUITCH UHEN SET UILL HRLT THE 
PROCESSOR UHEN RN ERROR IS DETECTED 
THE PC+2 RNO PSU RT THE TIME OF THE 
ERROR IS STORED ON THE STPCK. PRESSING 
CONTINUE UILL CRUSE THE ERROR TO BE 
TYPED (IF SELECTED) RND FURTHER TESTING 
RESUMED 

THIS SUITCH UHEN SET LOOPS THE CURRENT 
SUBTEST RECRROLESS OF ERROR CONDITION 



INHIBIT 
TYPEOUT 



ERROR 



THIS SUITCH 
TYPEOUT. 



INHIBIT SUB- 
TEST ITERATION 



INHIBIT 
FUNCTION TIME 
PUBLICATION 

RING BELL 
ON ERROR 

HALT AFTER 
SELECTED TEST 



SU06 CONTINUOUS 
(OOOlOO) CYCLE 



SU6-0 



TEST SELECT 



UHEN SET INHIBITS ERROR 



THIS SUITCH UHEN 
TO BE EXECUTED 
STARTUP ONLY). 



SET CRUSES ERCH SUBTEST 
ONLY ONCE (INITIRL 



THIS SUITCH 
PRINTING OF 
CHAPTER 8. ) 



UHEN SET UILL INHIBIT THE 
THE FUNCTION TIMES tSEE 



THIS SUITCH UHEN SET UILL RING THE BELL 
ON THE TTY UHEN RN ERROR IS DETECTED 

THIS SUITCH UHEN SET UILL CRUSE THE 
PROGRAn TO HALT AFTER THE TEST SELECTED 
IN SU06-SUO0 IS EXECUTED 

THIS SUITCH UHEN SET UILL CRUSE THE 
PROGRAM TO RUN CONTINUOUSLY UNTIL 
STOPPED BY THE OPERATOR 

THE PROGRAM UILL HALT AFTER EXECUTION 
OF THE TEST SELECTED WHEN SU07 IS SET 
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32»« Tn02 DRIVE FUNCTION TIHER POGE 7 

32S ERRORS « 

32b 

327 

328 

329 

330 

331 

332 

333 

33H 

33B 

33b 

337 

338 

339 

3^0 CHnPTER H 

3'»1 

3H2 ERRORS 

3H3 

3H4 

3H6 

3H6 TUG TYPES OF ERRORS ARE DETECTED BY THIS PROGRnn, HPRDUflRE ERRORS RNO 

3^7 INCORECT FUNCTION TIHES. 

3H8 

3«»9 

3S0 

351 4 1 ERROR TYPEOUT FORtlflT (HflRDURRE): ORTfl RELATED ERRORS (IE PARITY ERROR) RRE PRINTED 

352 AND HAVE NO EFFECT ON TIflE 
363 

35«» 

356 TEST I XXXXXX DEVICE ERROR 
366 

357 CSl HE BP FC CS2 DS ERt 

358 AAAAAA BBB666 CCCCCC DDDDDO EEEEEE FFFFFF GGGGGG 
359 

3bO UHERE 
3b 1 

3b£ XXXXXX = TEST NUMBER 

3bT AAAAAA-IMIil = CONTENTS Of TAPE REGISTER 172HH0-172H6H 

3bH 

3b5 

3bb 

367 ■» 2 ERROR TYPEOUT FORflAT (FUNCTION TIME OUT OF RANGED 

3b8 

369 TEST 9 XXXXXX OUT OF RANGE ERROR 

370 

771 RANGE ' <AAAAAA-BBBBB6> ACTUAL - CCCCCC 
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372 Tn02 DRIVE FUNCTION TltltR PAGE 8 

373 SUBROUTINE ABSTRRCTS 
374 

375 
376 
377 
378 
379 
380 
381 
382 
383 
384 
3SB 
386 
387 

3SS CHAPTER 5 

389 

390 SUBROUTINE ABSTRACTS 

391 

392 

393 

39H 5 1. SCOPE 

395 

396 THE SCOPE ROUTINE iS CALLED B\ THE SCOPE (EflT) INSTRUCTION AT THE 

397 START OF EACH SUBTEST THE SCOPE ROUTINE PERFORMS THE FOLLOUING 

398 FUNCTIONS 
399 

HOO 1 LOADS R5 UITH BASE ADDRESS 

HOI 

H02 2 TYPES TIHE LINE <SU08> 

H03 

HOH 3 PROVIDES CONTINUOUS LOOP <SUI1> 

HOB 

H06 H nOVES FUNCTION TIIIE INTO TABLE 

H07 

408 5 OUTPUTS LINE iTEtl IF SELECTED 

H09 

HlC 6 PROVIDES HALT ON TEST <SUQ7> 

mi 

|»12 7. DELAYS 350nS BEFORE STARTING TEST 

"♦13 

Hm 8. INIT'S DRIVE/SLAVE 

m5 

416 9 CLEARS THE ERROR FLAG (ERFLG) 

HI? 

mS THE ROUTINE tlONITORS SU1H< SUll, SUIO. SU08, AND SU07 

•I19 

H20 *«THIS ROUTINE HILL CHECK FOR CNTL G< G> BY DOING A JSR PCCKSUR 

H21 (REFER TO CHAPTER 3 FOR DESCRIPTION). 

HZ2 

H2Z S 2 PUBLISH 

H2H 

H2S THE PUBLISH ROUTINE IS CALLED FROM THE SCOPE ROUTINE IF SUlO IS EQUAL 

H26 TO 0 (PUBLISH TIME DOCUtlENT) THE ROUTINE UILL PRINT A "SINGLE LINE 

i»27 I TEH" EACH T'HE IT IS CALLED 
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SEO 0010 



H28 Tn02 DRIVE FUNCTION TIMER PAGE 9 

U29 SUBROUTINE RBSTRRCTS 

"4 30 
431 

H32 5 3. HLT 

•♦33 

H3<4 THE HLT ROUTINE IS CALLED BY THE HLT (TRAP) INSTRUCTION UHEN AN ERROR 

HZS IS DETECTED. A HLT (TRAP) INSTRUCTION FORflATS THE ERROR INFORHATION 

H36 AS SHOUN IN SEC HI A HLT^l (TRAP41) FORMATS THE ERROR AS SHOUN IN 

437 SEC 4. 2 

438 

H39 X«XTHIS ROUTINE UILL CHECK FOR A CNTL G < 6> BY DOING A JSR PC/CKSUR 

(REFER TO CHAPTER 3 FOR DESCRIPTION)) 

•♦•♦1 
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C2TUGC PU 

^^3 
^^^ 
^^s 
^^6 
^^7 

HH9 
>4S0 
H51 
t&Z 
H53 
^6^ 
H66 
HSb 
«»57 
458 
H59 

Hbl 
HbZ 
H63 
H6H 
H6S 
Hbb 
Hb7 
Hb8 
H69 
H70 
H71 
H72 
H73 
H7U 
«»76 
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Tn02 DRIVE FUNCTION TIMER 
niSCELLPNEOUS 



PAGE 10 



CHAPTER 6 
niSCELLRNEOUS 



b 1 STOCK POINTER 

THE STPCK POINTER iS INlTfllLLY SET TO 500 AND IS RESET TO 500 
SCOPEP ROUTINE 



b 2 EXECUTION TIHE 

UHEN SUI1=1 (INHIBIT ITERATIONS) THE TIME REQUIRED IS 2 niN. 
UHEN SWn=0 (ITERATE SUBTESTS) THE TIME REQUIRED IS 9 niN 



BY THE 
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"476 

"477 

H78 

479 

480 

>t81 

482 

483 

484 

485 

48( 

487 

488 

489 

490 

49! 

492 

493 

494 

495 

496 

497 

498 

499 

500 

501 

502 

503 

504 

505 

506 

507 

508 

509 

510 

511 

512 

513 

514 

515 

516 

517 

518 

519 

520 

521 

522 

523 

524 

525 

526 

527 

528 

529 

630 

531 
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CHAPTER 7 
PROGRPn DESCRIPTION 



7 1 SAMPLE TIME DOCUMENT 

TYPE FIRST ADDRESS OF CONTROLER 172440 

TYPE TM02 DRIVE I'S TO BE TESTED 0 

FOR TM02 DRIVE 0- TYPE SLAVE fS tq BE TESTED 7 

TAPE SPEED TESTS ONLY** (YES/NO = 1/0) 0 

NR2 ONLY? (YES/HO = I/O) 0 

ttttttttttttttttttttttttttttttttttttnttttttttnttttttttttttttttttttt 

t Tn02 DRIVE FUNCTION TIHES- DRIVE ff 0 SLAVE 8 7 9 CHAN SER 9 5009 



t 

t FUNCTION 
t URITE FROM BOT 
t URITE START 
t URITE SHUTDOUN 
t URITE SETTLEDOUN 
X READ FROM BOT 
t READ START 
X READ SHUTDOUN 
t READ SETTLEDOUN 
t READ REV START 
t READ REV SHUTDOUN 
t READ REV SETTLEDOUN 
t TURN AROUND DELAY F 
t TURN AROUND DELAY R 
t GAP SIZE-STOP HALF 
t GAP SIZE-START HALF 
t GAP SIZE-INTERRECORO 
t GAP CONSISANCY 
t DATA TinE-200 BP I 
t DATA TIME-556 BP I 
t DATA TmE-800BPI 
t DATA TmE-1600BPI 
t ERASE GAP TIME 
t URITE FILE MARK 



TmE(SPECIFICATION) 
RANGE: < 154000- 150000) 
RANGE=<009500-008700> 
RANGE- <008900-0086QQ> 
RANGEs<Qt3S00-00810G> 
RANGE=<037000-033000> 
RANGE-<0G3200-002600> 
RANGE: <004660-a04250> 
RANGEs<013500-0081G0> 
R ANGE = < 003200- 002600 > 
RANGES <GG37GG-0Q33G0> 
RANGES <G13SGG-G081G0> 
R RANGE=<G167GG-G1G7GG> 
F RANGEs<Gt67GG-GlG7GG> 
RANGE=<012900-0G96GG> 
RANGE-<G1 1800-008600) 
RANGES <0m800-G13700> 
RANGE: <0mG0G-01 2400) 
RANGEs<024100-023100> 
R ANGE 3 < 024 000- 0230GG> 
RANGES <G2400G-023000> 
RANGEs<026100-02m00> 
RANGES < 101 000-099000) 
RANGEs<105000-103000> 



TIME (ACTUAL) 

ACTUAL =152740 
ACTUAL =0091 20 
ACTUALsG08840 
ACTUAL=G1G970 
ACTUAL=035580 
ACTUAL=002740 
ACTUflL=004360 
ACTUAL=010970 
ACTUAL=GG2740 
ACTUAL=0G3520 
ACT' IL =01 0970 
ACTUALs013600 
ACTUALS013660 
ACTUALs012200 
ACTUAL=010520 
ACTUAL=014500 
ACTUAL=013040 
ACTUAL =0234 60 
ACTUALS023350 
ACTUAL=023400 
ACTUAL=024470 
ACTUAL=099510 
ACTUAL=103990 
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B33 

BJS 
53b 
537 
538 
539 
5^0 
5m 
5*42 
51*3 
5^4 
5U5 
5'*b 
S^" 
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B 
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2 
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HS PAGE m 



SEQ oom 
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7. 1. 1 SAMPLE TIME DOCUMENT FOR TAPE SPEED TESTS 
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TYPE FIRST ADDRESS OF CONTROLLER 

TYPE TM02 DRIVE I'S TO BE TESTED 0 

FOR TM02 DRIVE 0- TYPE SLAVE I'S TC BE TESTED 7 

SPEED TESTS ONLY** (YES/NO = 1/0) 1 

tttttttttttttttttttttttnttttttttttttttttttttutttttttuttuttttttt 

«TM02 DRIVE FUNCTION TIMES- DRIVE ff 0 SLAVE ff 7 9 CHAN SER. II 6009 
t 

«FUNCTION TIME (SPEC IF I CAT ION) TIME (ACTUAL) 

«TAPE SPEED FWO RRNGE=<022700-021700> ACTUAL=022500 

«TAPE SPEED REV RflNGE=<022700-02l700> RCTUAL=022500 
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SEQ 0016 



5i«9 

560 

661 

662 

663 

66^ 

666 

666 

667 

668 

669 

660 

661 

662 

663 

66t 

666 

666 

667 

668 

669 

670 

571 

572 

673 

67U 

576 

576 

577 

578 

579 

580 

581 

582 

583 

5S>* 

586 

586 

687 

6S8 

689 

690 

691 

692 

593 

59H 

595 

596 

697 

598 

699 

600 

601 

602 

603 
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7 2 TEST SEQUENCE UITH RELATED ADJUSTMENTS AND ASSOCIATED HARDURRE 
TEST NO. /NRtlE 



1 URITE FROM BOT 

2 URITE START 

3 URiTE SHUTOOUN 

^ URITE SETTLEDOUN 

6 READ FROn BOT 

6 READ START 

7 READ SHUTDOUN 
10 READ SETTLEDOUN 

11. READ REVERSE START 

12. READ REVERSE SHUTDOUN 

13. READ REVERSE SETTLEDOUN 
m. TURN AROUND F-P 

15. TURN AROUND R-F 

1'^ GAP SIZE-STOP HALF 

17. GAP SIZE-START HALF 

20 GAP SIZE INTERRECORD 



RELATED ADJUSTMENTS 
NONE 



FUPD/PEV SPEED-STRRT/STOP-RAMPS 
SAME flS IN TEST 16 
FUD'REV SPEED 
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SEQ 0016 



604 

605 

606 

607 

608 

609 

610 

611 

612 

613 

61H 

615 

616 

617 

61S 

619 

b20 

621 

622 

623 

62H 

625 

626 

627 

628 

629 

630 

631 

632 

633 

63M 
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21 GRP CONSISTENCY XSRHE PS IN TEST 16 

XTEST NUnBER 22 IS RESERVED FOR FUTURE USE 

23 DRTR TinE 200 BP I XNONE 



2M DRTR TinE 556 BP I 



25 DRTR TIME 800 BP I 



26 DRTR TinE 1600 BP I 



27. ERRSE GRP TinE 



30 URITE FILE nflRK 



31. TRPE SPEEO-FORURRO 



32. TRPE SPEED-REVERSE 



X 
* 
t 
t 
t 

«FUD SPEED 
tPEVERSE SPEED 



t»«»tNOTE IF TinE PROBLEnS RPPERR IN Tl THRU T3: RUN TRPE SPEED TESTS FIRSTXXtXXXX 
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SEQ 0017 



b3B 

b3b Tn02 DRIVE FUNCTION TIHER PAGE 15 

637 

b38 7 3 TEST DESCRIPTIONS. 

639 

b^0 THE FIRST THIRTEEN (13) TESTS (Tl - T15) PRE CHECKS OF THE 

bm ROM CIRCUITS IN THE TE16 (n9811)/ THE flCCL COUNTER IN THE 

bH2 Tn02 (f18903), AND THE SETTLEOOUN ONE SHOT (tt8910) 
b^3 

bH^ Tl. URITE FROn BOT- 
bH6 

btb THIS TEST UILL IIERSURE flCCELLERPTION DELPY REQUIRED TO 

b>47 nOVE THE TAPE RPPROXmPTELY SEUEN (7) INCHES FORUPRD 

hHS FROM DERD stop RT BOT BEFORE STRRTING TO TRRNSFER DPTP 
bH? 

bBO 1 RSSURE TRPE IS STOPPED RT BOT. 

bBl 2 ISSUE R URITE COtltlRNO 

bS: 3 MONITOR BIT IS OF TC (PCCL) 

b53 TIME FROM GO TO RCCL RESET IS BOT OELRY 

b5H 5. STOP 

655 

656 T2. URITE STRRT: 
667 

658 THIS TEST UILL MERSURE RCCELLERRTION OELRY JUST RS IN 

659 Tl. HOUEVEP THE TIME UILL BE LESS UHEN NOT STRRTING 

660 FROM BOT. 

b62 1 LCRVE TAPE RT ITS PRESENT POSITION ASSURE THAT IT IS STOPPED 

663 2. ISSUE A URITE COMMAND 

66>t 3 MONITOR BIT 16 OF TC (RCCL) 

665 H TIME FROM GO TO RESET OF RCCL IS STRRT DELRY 

666 5. STOP 
667 

668 T3. URITE SHUTDOUN. 

670 THIS TEST UILL HERSURE THE TIME FROM EOR (LAST CHARACTER 

671 URITTEN ON TAPE) TO THE START OF SETTLEDOUN TIME THIS 

672 ASSURES, "N PART, R PROPER INTERROCORD GPP 

67M 1 LERUE TRPE RT ITS PRESENT POSITION ASSURE THAT IT IS STOPPED 

675 2. ISSUE A URITE COMMAND 

676 3 MONITOR FRAME COUNTER AND BIT 4 OF OS (SDHN) 

677 H. TIME FROM FC=0 TO ASSERTION OF SOWN IS 

678 THE SHUTDOWN TIME 

679 5 STOP 
680 
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b81 
b82 
b83 
68H 
685 
68b 
b87 
b88 
689 
690 
b91 
b92 
b93 
b9H 
b9B 
b9b 
697 
698 
699 
700 
701 
702 
703 
70H 
705 
706 
707 
708 
709 
710 
711 
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SEQ 0018 



URITE SETTLEUOUN 

THIS TEST UILL HEflSURE THE SLOUDOUN TlflE THE TIME 
FROM THE START OF SLOUOOUN UNTIL THE TAPE SHOULD 
BE STOPPED. THIS IS fl PART OF THE GOP TmiNG IN LOGIC 
THE MECHflNICflL POSITIONING OF THE TAPE IN THE GOP DISTANCE 
UILL BE HEflSUREO IN R LRTER TEST. 

1. LEAVE TAPE AT ITS PRESENT POSITION ASSURE THAT IT IS STOPPED 

2 ISSUE A URITE COtlflAND 

3 nONITOR BIT H OF OS (SOUN) 

H TIME FROM SET OF SOHN TO RESET OF SDUN IS THE 

SETTLEDOHN DELAY 
5 STOP 



T5 READ FROM BOT 

THIS MEASUREMENT IS MADE EXACTLY AS THE WRITE 
MEASUREMENT IN Tl USE THE SAME RECORD THAT MAS 
WRITTEN IN Tl 

t REWIND TO BOT 

2 ASSURE TAPE HAS HAD TIME TO COME TO A COMPLETE STOP 

3 READ FORWARD 1 RECORD 

H MONITOR BIT 16 OF TC fACCL) 

5 TIME FROM GO TO ACCL IS BOT DELAY 

b STOP 
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712 16 REPD STRRT 

713 

7m THIS TEST HERSURES THE SRHE OELRY RS IN T2 

716 

71b 1 URITE 1 RECORD, THEN BRCKSPRCE OVER IT, RSSURE TRPE IS STOPPED 

717 2 ISSUE R RERD FORURRD OF THE RECORD URITTEN IN STEP 1 

718 3 nONITOR BIT IB OF TC (RCCL) 

719 H TIHE FROn GO TO RESET CF RCCL IS STRRT DELRY 

720 B STOP 
721 

722 T7 READ SHUTDOWN 

723 

72^ this test tlersures the srme delry rs in t3 
■^:b 

'zfe 1 urite 1 record, then brcksprce over it, rssure tape is stopped 

72- 2 read forward the record uritten in step 1 

728 3 monitor frafle count and b i t m of os (sdun). 

'29 h time fron fc=record size (last frame rkao) to sdun=1 

730 IS THE SHUTDOUN TlflE 

731 B STOP 
732 

733 TIO READ SETTLEDOUN. 
73«4 

73B THIS TEST ^lEASURES THE SAME DELAY AS IN TH 

73b 

737 1 URITE I RECORD, THEN BACKSPACE OVER IT, ASSURE TAPE IS STOPPED 

738 2 READ FORUARD THE RECORD URITTEN IN STEP 1 

739 3 MONITOR BIT H OF OS (SDUN) 

7^0 «♦ TIHE FROn SET OF SDUN TO RESET OF SDUN IS THE 
7m SETTLEDOUN DELAY 

7H2 6 STOP 

7Hi» 
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7H5 
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7H7 

7H8 TU REPD REVERSE STRRT 
7H9 

7S0 THIS TEST UILL HERSURE THE START DELAY IN THE REVERSE 

76t DIRECTION 

752 

753 1 URITE 1 RECORD. ASSURE TAPE IS STOPPED 

75>t 2 READ REVERSE THE RECORD URITTEN IN STEP 1 

755 3 MONITOR BIT IS OF TC (ACCL) 

'6b H THE TinE FROH GO TO RESET OF ACCL IS THE S^APT TIME 

757 5 STOP 

'58 

759 T12 READ REVERSE SHUTDOUN 

760 

761 THIS TEST UILL HEASURE THE READ SHUTDOUN IN THE REVERSE 

762 DIRECTION 
7b3 

7bH 1 URITE 1 RECORD, ASSURE TAPE IS STOPPED 

7b5 2 READ REVERSE THE RECORD URITTEN IN STEP 1 

7bb 3 MONITOR FRAME COUNTER AND BIT H OF DS (SDUN) 

7b7 H TIME FROM FC-RECORD SIZE (LAST FRAME READ) TO SDUN=1 

7b8 IS THE READ REVERSE SHUTDOUN TIME 

769 5 STOP 

770 

771 

772 T13 READ REVERSE SETTLEDOUN. 
773 

77H THIS TEST HILL MEASURE THE READ SETTLEDOUN IN THE PEVEPSE 

775 DIRECTION 

77b 

777 1 URITE 1 RECORD, ASSURE TAPE IS STOPPED 

778 2 READ REVERSE THE RECORD URITTEN IN STEP 1 

779 3 MONITOR BIT H OF DS (SDUN) 

780 TIME FROM SET OF SDUN TO RESET OF SDUN IS THE 

781 SETTLEDOUN DELAY 
7S: 5 STOP 

7S3 

7S^ TIH. TURN AROUND DELAY-FORUARD TO REVERSE 

785 

?Sfe THIS TEST UILL MEASURE THE TIME REQUIRED FCR THE TAPE 

787 TO CHANGE DIRECTION. 

788 

789 1 LEAVE TAPE AT ITS PRESENT POSITION ASSURE THAT IT IS STOPPED 

790 2 ISSUE A URITE FORUARO OF AT LEAST 20 FRAMES 

791 3. MONITOR BIT 7 OF DS (DRY) 

792 ^ UHEN DRY IS ASSERTED (EOR), IMMEDIATELY ISSUE A 

793 READ REVERSE OF THAT RECORD 
79M 5 MONITOR BIT 15 OF TC (ACCL» 

795 b TIME FROM GO OF READ REVERSE TO RESET OF ACCL IS 

796 THE TURNAROUND TIME 

797 7 STOP 
798 
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799 

800 Tt102 DRIVE FUNCTION TinER PRGE 18 

sot 

802 TtS TURN AROUND CELRY-REVERSE TO FORURRD 

803 

SOH THIS TEST UILL HEBSURE THE TinE FS IN TIH, BUT IN THE 

805 OPPOSITE DIRECTION 

806 

807 1 URITE I RECORD 

808 2 ASSURE TRPE IS STOPPED 
80? 3 RERD REVERSE 

810 H MONITOR DRY (BIT 7 OF DS; 

311 5 UHEN DRY = 1. ISSUE fl RERD FORURRD 

8i: b MONITOR flCCL (BIT 15 OF TO 

Si: 7 TIME FROM GO FORURRD TO flCCL =1 IS THE TURN RROUNO TIME 

IV- 8 STOP 
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816 

81? GAP flEflSUREMENTS. 
818 

819 THE PREVIOUS THIRTEEN (13) TESTS HERE HERSUREMENTS OF LOGIC 

820 DELRYS PERFORMED BY THE Tn02 OR TE16 IN ORDER TO RLLOU FOR 

821 PROPER fiCCELERflTION RND OECELLERflTlON OF TOPE RCCORDING TO 

822 THE DESIRED INTEROCORD GRP (.6 INCHES) THIS TEST, HOWEVER, 

823 WILL tlEflSURE THE PHYSICRL SIZE OF THE INTERCORD GRP THAT 
82H EXISTS ON TRPE RS R RESULT OF THE STRRT/STOP Tir;ES OF 

825 THE CRPSTRN ITSELF. BECRUSE THE INTERRCORD GRP IS 

826 CREATED BY THO ACTIONS, THE START OF MOTION AND THE 

827 STOP OF MOTION IT IS NECESSARY TO MAKE THO SEPERATE 

828 MERSUREMENTS. R THIRD MERSUREMENT, MRDE ON THE FLY, OF 

829 THE ENTIRE LENGTH OF THE GAP HILL ALSO BE MADE 
830 

831 T16. GRP SIZE (STOP HALF) 
832 

833 THIS TEST WILL MEASURE THE DISTANCE TRRVLED BY THE TAPE 

83H IN A STOP CYCLE. IN OTHER WORDS, THE DISTANCE INTO 

835 THE IRG. 
836 

837 1. WRITE 1 RECORD. 

838 2 ASSURE TAPE tS STOPPED. 

839 3 ISSUE A READ REVERSE OVER THE RECORD 

8H0 MONITOR THE FRAME COUNT FOR THE FIRST FPAME PEAD <FC = 1) 

8Ht 5 THE TIME FROM G0=1 TO FC=1 IS THE LENGTH OF THE GfiP 

8H2 6 STOP 
8*43 

SHH T17. GAP SIZE (START HALF) 
8H5 

8H6 THIS TEST WILL MEASURE THE DISTANCE OF TRPE TRAVEL 

8H7 DURING START UP. 

8H8 

8H9 1 WRITE 1 RECORD, THEN REVERSE OVER IT, ASSURE TAPE IS STOPPED 

860 2 ISSUE A READ FORWARD 

861 3 MONITOR FC FOR FC=1 

852 M TIME FROM GOsl TO FC=1 IS START DISTANCE 

S63 5 STOP 

36>4 

865 T20. GAP SIZE ( INTERRECORD) 
856 

86? THIS TEST WILL MEASURE THE ENTIRE LENGTH OF THE IRG ON 

858 THE FLG. THE TIME VALUE OF THIS TEST SHOULD NOT BE 

869 EQUAL TO A SUMMATION OF T16 AND T17 DUE TO THE FACT THAT 

860 THE RCCELLERATION AND DECELLERAT ION CURVES ARE NOT iN 

861 EFFECT. THE VALUE HERE SHOULD ACTUALLY BE LESS THAN THE 

862 SUM OF T16 AND T17 
863 

86H 1 WRITE 2 RECORDS 

866 2. READ REVERSE OVER THE SECOND RECORD 

866 3 MONITOR DRY (BIT 7 OF DS) 

867 M. WHEN DRY = 1, ISSUE A SECOND READ REVERSE 

868 B MONITOR FRRME COUNT 

869 6 TIME FROM G0=1 OF SECOND READ REVERSE TO FC-M 1^ THE 

870 LENGTH OF THE GAP 
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87\ 



7 STOP 
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872 TnQ2 DRIVE FUNCTION TIHER PAGE 20 

873 

S7^ T21. GOP CONSISTENCY, 
876 

876 NOU THAT UE HAVE ESTRBLISHED THAT THE INTERRCORD 

877 GRP IS THE PROPER SIZE. LET US DETERMINE THE CONSISTENCY 

878 OF THE GRP UNDER VARIOUS COnnRND EXECUTION TIMES. 

879 BY URITING R SERIES OF RECORDS/ ERCH UITH R DIFFERENT 

880 DELRY BETUEEN EXECUTION, UE CRN ESTRBLISH THE CONSISTENCY 

881 OF THE GRPS BY RERDIN6 THESE RECORDS RND MONITORING 

882 THEIR INTERRECORD GRPS, ON THE FLY. 
883 

88>4 1 REUIND TRPE TO BOT. 

886 2 WRITE ONE (1) RECORD TO GET TAPE OFF BOT 

8Sb 3 URITE SIXTEEN (t6) RECORDS UITH R PROGRESSIVE DELRY 

887 OF FROM 0 TO lb MILL i SECONDS (RPPROX) BETUEEN COMMRNOS 

888 H BRCKSPRCE 16 RECORDS RND RLLOU THE TRPE TO STOP 

889 B. RERD FORURRD (NON-STOP) OVER THESE lb RECORDS, ERCH 

890 TIME MONITOR I NO THE TIME FROM THE END OF RECORD (DRY) 

891 UNTIL THE FRflflE COUNT NEXT GOES FROM 0 TO 1 (FC=1) 

892 6. THE TIMES FROM DRY TO FC^l IS THE GRP TIME RND IT 

893 SHOULD REMRIN CONSISTRNT FOR RLL RECORDS. 
89^ 7. STOP 

89S »»(SEE GTIMTBL IN DZTUG LISTING FOR GRP TIMES)** 

89b 
897 

898 T22. RESERVED FOR FUTURE USE***** 

899 

900 T23. ORTR TIME RT 200 BP I: 

901 

902 THIS TEST UILL MERSURE THE TIME REQUIRED TO URITE 

903 ONE (1) INCH OF TAPE AT 200 BP I. 

90H BY URITING A RECORD OF ENOUGH FRAMES TO MOVE 

90S THE TAPE 1 INCH (200 FRAMES), DATA RATE 

90b CAN BE VARIFIED 
907 

908 1 REUIND TO BOT RND RLLOU TRPE TO STOP 

909 2 URITE A RECORD RT 200 BP I. 

910 3 MONITOR DRY (BIT 7 OF DS) FOR ERCH RECORD 

911 H. THE TIME FROM FCsFC*l TO DRY UILL BE THE TIME REQUIRED 
91 : FOR 1 INCH AT THE SELECTED DENSITY 

913 5. STOP 

9m 

916 

91b T2H. DRTR TIME RT 66b BP I 

917 REPERT STEPS 1 THRU 5 OF T23 RT 666 BP I 

918 

919 T26. ORTR TIME RT 800 BP I: 

920 REPERT STEPS 1 THRU 6 RT 800 BP I 
921 

922 T2b DRTR TIME RT IbOO BP I (PE): 

923 REPEAT STEPS 1 THRU 5 RT 1600 BP I 

92M »»THIS TEST IS NOT EXECUTED IF NR2 ONLYt* 



926 
92b 
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927 
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929 

930 T27. ERASE: 
931 

932 THE ERRSE COnnRND UILL CRUSE RN RRER OF THE THREE (3) 

933 INCHES TO BE DC ERASED IN THE FORURRD DIRECTION. 
93H THIS TEST HILL ASSURE THAT THE PROPER DISTANCE IS 
93B ERASED. 

936 

937 1. LEAVE TAPE AT ITS PRESENT POSITION. 

938 2. ISSUE AN ERASE COMHRNO. 

939 3 MONITOR DRY (BIT 7 OF OS) 

9>«0 H. THE TIME FROfl GO TO DRY UILL BE THE TIME 

9m REQUIRED TO ERASE 3 INCHES OF TAPE AND UILL 

9>«2 REFLECT THE DISTANCE. DENSITY IS NOT A FACTOR. 

913 5. STOP 

94H 

9*lB 

9>46 T30. TAPE HARK: 
9H7 

9M8 THIS TEST IS ALSO A CHECK ON THF THREE (3) INCH GAP 

9i«9 UHEN A TAPE HARK IS URITTEN, A3 INCH GAP IS 

960 CREATED BEFORE DATA IS PUT ON TAPE 
961 

962 1 LEAVE TAPE AT ITS PRESENT POSITION 

963 2 ISSUE A URITE TAPE MARK COrWiAND 
95«» 3. MONITOR DRY (BIT 7 OF DS) 

965 4 THE TltlE FROM GO TO DRY UILL BE THE TIME 
96b REQUIRED TO URITE THE Tfl RECORD 'PLUS THE 

967 3 INCH GAP 

96S 5 STOP 
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969 TnG2 DRIVE FUNCTION TIMER PP6E 22 
960 

961 T31. TAPE SPEED FORURRO: 
962 

963 THIS TEST REQUIRES THE USE OF AN 800 BP! SKEU TAPE! 

9b^ THE OPERATOR UILL BE REQUIRED TO MOUNT THE SKEU TAPE 

965 BEFORE EXECUTING THE TEST. THE SKEU TAPE IS THE ONLY 

966 UflY TO ASSURE THAT TAPE IS MOVING AT THE PROPER SPEED 

967 BECAUSE THE FREQUENCY OF FRAMES ON A SKEU TAPE IS 

968 GUARANTEED TO BE ACCURATE. 
969 

970 1 ASSURE TAPE IS STOPPED AT BOT. 

971 2. ISSUE A READ FORUARD (800 BPL NORMAL) 

972 3. MONITOR FC FOR FC s 800(10) 

973 4 MONITOR FC FOR FC = 8800(10) 

974 5 TIME FROM FC = 800 TO FC = 8800 IS THE TIME REQUIRED 

975 FOR TAPE TO TRAVEL 10 INCHES 

9?fe 6 DIVIDE THE TIME FOR 10 INCHES BY 10. 

977 7. THE RESULT IS AN AVERAGE SPEED FOR 1 INCH 

978 8 STOP. 
979 

980 T32. TAPE SPEED REVERSE: 

982 THIS TEST IS THE SAME AS TEST 31, BUT SPEED iS 

983 MEASURED IN THE REVERSE DIRECTION 
984 

985 1. ADVANCE TAPE OFF OF BOT. 

986 2 ISSUE A READ REVERSE. 

987 3. REPEAT STEPS 3 THRU 6 IN THE REVERSE DIRECTION 

988 4 STOP. 
989 

990 
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SEQ 0027 



991 




992 




993 




99«» 




995 




996 




997 




998 




999 




1000 




1001 




1002 




1003 




lOO^ 




1006 




10% 




1007 




1008 




1009 




1010 




1011 




1012 




1013 


100000 


IQIH 


0^0000 


1015 


020000 


1016 


004 000 


1017 


002000 


1018 


001000 


1019 


000400 


1020 


000200 


1021 


000100 


1022 




1023 




\02H 




1025 




1026 





NLIST 
LIST 
RBS 
nCRLL 
TITLE 
SBTTL 



tIE 



ICPVEC, tCPREG, tCRTCH, tTYPE 
OZTUG-B Tn02/TE16 DRIVE FUNCTION TiriER 
STARTING INSTRUCTIONS 
LORDING RND STARTING PROCEEDURE 

LORD PROGRRfl USING RBS LOROER 
LORD RODRESS 200 
SET SUITCH OPTIONS 
PRESS STRRT 

GENERRL REGISTER USRGE. 

RQsRDDRE'iS OF 'FC REGISTER (SET BY SCOPE) 
RURDDRESS OF 'OS' REGISTER (SET BY SCOPE) 
R2=RETURN PC FROtI TIMER (SET BY ERCH TEST) 

R3=INDEX INDlCRTiNG PREVIOUS OSCILLRTOR POLARITY (SET BY TIMER) 
RHsCONTRINS 'TICK' COUNT UHEN TI«ER IS RUNNING (SET BY TIMER) 
RS^RDDRESS OF CSl (SET BY SCOPE) 



SUITCH REGISTER SUITCH RSSIGNHENTS 



SUIS: 

sums 

SU13= 
SU11 = 
SUlO: 
SU09= 
SU08= 
SU07S 
SU06: 



100000 
040000 
020000 
004000 
002000 
001000 
000400 
000200 
000100 



HRLT ON ERROR 
LOOP SUBTEST 
INHIBIT ERROR TYPE OUT 
INHIBIT SUBTEST ITERATION 
INHIBIT PUBLICATION OF FUNCTION TlflES 
RING BELL ON ERROR 
TYPE LINE ITEM AFTER EACH I 'ER AT I ON 
HALT ON TEST SELECTED IN SHOS-SWOO 
CONTINUOUS CYCLE 
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1027 
1028 
1029 
1030 
1031 
1032 
1033 
103>t 
103B 
103b 
1037 
1038 
1039 
IGHO 
IGHl 
10>t2 
10H3 
lOHH 
IGHS 
lOHb 
10H7 
10H8 
10H9 
1060 
10B1 
1062 
1053 
10614 
1066 



nnCYll 30(10Hb) 02-DEC 
STARTING INSTRUCTIONS 
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S^Q 0028 



0007b4 
OOOOMO 
OOOOHO 000 

oooom 

OOOOtl 000 



000042 
0000U2 OOOOOQ 



0000Mb 
OOOOM 6 0132bH 

C00052 
000062 000000 



ooorbM 



tttttttttttttttttttttttttttttttttttttttttttttttttttttttttt 

fiCTll HOOKS 

ttttttttttttttttu*tttttttttttttttttttuttt$*tt**ttttttt 



DRIVE 



4SVPC= 
=M0 
BYTE 



HED'Utl BYTE 



=42 
UORD 



0 
0 



, DRIVE ff FOR XXDP LORD nEDlUM 



,XXDP LOAD MEDlUn 
;flSSEnBLE flS A 0 



; LOCATION INDICATOR - AUTOM/nPN MODE 
.nSSEHBLE AS fl 0 



UORD SENDRD .SET TO SENDflD IN SEOP 

0 ; CHARACTER I ST ICS OF PROGRfln 

; SET TO A 0 



=52 
UORD 



=SSVPC .RESTORE PC 

tt*tuttttttittttttututttttt*ttttu*ttttttttttttttt*%tt 
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1057 
1058 
1059 
lObO 
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SEQ 0029 



tutttttuttutttttttunutttttttttttttutttututtttttttutttt 

RCTU nODE INDlCflTORS 

utttttttttittttttttttttttttttttttutttutttttttttttttuttutttt 



lObl 


0007bH 


000000 


fiUTOri: 


. UORD 


0 


;AUTOnflTIC nODE INDICflTOR 


10b2 


0007bb 


000 


flCTiin. 


BYTE 


0 


,fiCTll fiUTO flODE INDICflTOR 


1063 


0007b7 


000 


XXDPtI 


.BYTE 


0 


,XXDP flUTOn MODE INDICATOR 


106H 


000770 


000 


RDunpn- 


BYTE 


0 


.flCTll DUnP nODE INDICflTOR 


i%5 


000771 


000 


xDunpti 


BYTE 


0 


,XXDP DUnP nODE INDICflTOR 



ttttttttttttttttttttttttttutttttttttttttttttttttttttt 
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1069 
1070 
1071 
1072 
1073 
107H 
1075 
1076 
1077 
1078 
1079 
1080 
1081 
1082 

los: 
lost 
loss 

1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
109H 
1095 
1096 
1097 
1098 
1099 
1100 
1101 
1102 
1103 
UOH 
1105 
1106 

nor 

IIOS 

no? 



nnCRO tCHNtlODE 

utttttutttntttutttttttttututtuttttttttttttutttt 



/ 




nnCRO FOR SIZING DRIVES AND SLRVES 


0 




IN QllTOHQTir HAOF 




/ 


nov 




, INIT OR 1 VE NUMBER 


NXTDRU 


MOU 


•-1. SLVNUn 


; INIT SLAVE NUMBER 


IS 


HOU 


1* ~ W\m ^im 


; INIT CONTROLLER 




INC 




;STEP DRIVE 41 




CMP 


gin, DRVNUfI 


;flLL DRIVE TESTED'' 




BNE 




; BRANCH - IF NO 




J MP 


F INISH 


;EXIT 


25 


nov 


ORVNun, acs2 


;LOAO DRIVE • 




TST 


dCSl 


; ACCESS DRIVE 




BIT 


110000/ dCS2 


/ NON-EX ISTANT DRIVE'' 




BNE 


\% 


; BRANCH - IF YES 


NMSLV 


INC 


SLVNUfI 


;STEP SLAVE ff 




BNE 


It 


.BRANCH IF NOT SLAVE 0 




TST 


ORVNUn 


/DRIVE 0? 




BNE 


It 


/BRANCH - IF NO 




TSTB 


XXDPtI 


zXXDP? 




BEQ 


\% 


; BRANCH - IF NO 




INC 


SLVNUtI 


;STEP TO SLAVE HI 


IS 


cnp 


ilO, SLVNUn 


/ALL DRIVES TESTED'' 




BEQ 


NXTORV 


; BRANCH - IF YES 




MOV 


SLVNUtI. dTC 


:LOAD SLAVE UNIT'' 




BIT 


iZOOO, dOT 


/SLAVE PRESENT"* 




BEQ 


NXTSLV 


/BRANCH - IF NO (SPR=0) 




BIT 


tmOOOO/dOT 


. IS DRIVE A TAPE UNIT** 




BEQ 


NXTSLV 


/BRANCH IF NO 



t%ttt%txt%%t%txtttt%%%%t%t%%tt%%h%%%t%%%t%tt%ttxtt%xxxttt 

ENDM SCHNMODE 
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1110 










1 1 1 1 




SQTTL 

WU 1 I k 


MACRO DEF INITIO 




1112 




MACRO 


SAVE 




1113 




JSR 


PC. SAVE 


/SAVE REGISTERS ON THE STACK 


1 1 IH 




FNDM 


SAVE 

wn V b 




1115 




MACRO 


RESTORE 

n b w 1 vn b 




111b 




JSR 


PC, RESTORE 

r V / n b w I vn b 


/RESTORE REGISTERS FROM THE STACK 

/ n b w 1 vn b nbuiwibnw rn vi i i rib w i IV 


1117 




ENDM 


RESTORE 

i\ b w 1 vn b 




1118 




MACRO 


INPUT 




1119 




JSR 


PC. INPUT 


/GET USER INPUT 


1 IZO 




ENDM 


INPUT 




1 \2\ 




MACRO 


REUIND 




1 122 




JSR 


PC/ REUIND 


/REUIND SLAVE 


1123 




BVS 


99f 


/BRANCH IF ERPOR ON REUIND 

r mm riff V i ■ f ^ r* ■ ^ b * ■ 


1 1 24 




ENDM 


REUIND 




1 12E 




MACRO 


T IMEON 




1 12b 




JSR 


PC/ TinON 


/TURN TIMER ON 


1 127 




ENDM 






1 128 




MACRO 


TIMCHK 




1 129 




JMP 


T IMER(R3) 


;G0 TO TIMER & RETURN ViA R2 


1 130 




ENDM 






1 1Z1 




MACRO 


SETGO 




1132 




INC 


(R6) 


/SET "GO* BIT 


1133 




ENDM 




• 


113H 










1136 




SBTTL 


REGISTER flSSlGNHENTS 


1136 




.DEFINITIONS RND REGISTER flSSIGNnENTS 


1137 




.GENERAL REGISTER flSSIGNHENTS 




1138 


000000 


ROs'/O 






1139 


OOGOOl 


RlsXI 






imo 


000002 


R2»*/{2 






1 im 


000003 


R3s5{3 






im2 


OOOOOH 


RHs%M 






1 m3 


000005 


RS:*/:6 






1 1Hi* 


00000b 


SP=*4b 






1 ms 


00U007 


PC=*/.7 






1 mb 


000000 


R10=5{0 






1 1 u 


nnnnni 


Rl 1=551 






1 ms 


000002 

www Wa> 


R12=*/.2 








000003 

WWW WWW 


R13SV.3 






1 15G 


nnnnnu 

wwwww < 


RlHsXH 








DD00D5 

WWW WW w 


R15:%6 






1 152 














.REGISTER ADDRESSES 




1 1 3~ 


17777b 


PSW= 


177776 


/.PROCESSER STATUS UORD 


1 155 


\7777H 


SLR= 


\7777^ 


//STACK LIMIT REGISTER (11A0.il/H6) 


1156 


\7777Z 


PIRQ= 


\7777Z 


/.PROGRAM INTERRUPT REQ (11/HB) 


1157 


\77770 


U6REAK= 


177770 


//MICRO-BREAK REGISTER (ll/tS) 


1 158 

I 1 30 


1 77560 


TKS= 


177560 


//KEYBOARD CSR 


1137 


177562 

Iff 


TKB= 


177662 


//KEYBOARD DATA BUFFER REGISTER 


1160 


17756H 


TPS= 


1 7756M 


//TELEPRINTER CSR 


1161 


1 77566 


TPB = 


1776bb 


//TELEPRINTER DATA BUFFER REGISTER 


1162 










1163 




.VECTOR ADDRESSES 




116i» 


ooooot 


ERRVEC= 




/ -ADDRESS OF ERROR VECTOR 


1165 


0000 10 


RESVEC= 


10 


..ADDRESS OF RESERVED INST TRAP VECTOP 



G 3 

DZTUG-B Tn02/TEl() DRIVE FUNCTION TIMER HRCYll 30(lOHb) 02-DEC-77 09 48 PAGE 32 SEQ 0032 

C2TUGC Pll 02-0EC-77 09 REGISTER flSSIGNHENTS 



1 loo 


0000 IH 


TBITUEC 


=m 


/ / HDDkLos Or 1 oil IKHr VL(.IUK 


lie 


00001 ^4 


TRTVEC= 


m 


//HODRL^b Ur IKHLt IKHr VtClUK 


1 loS 


0000m 


BPTUECs 


m 


QAADCCC Ar ' QOr QVDA 1 UT ' TDQD IfCrTAD 
/ / HUOKtSb Or oKtH^rOINI IKHr VtLlOK 


1 lb9 


onon9n 

oooozo 


IOTUEC= 


20 


QAAOrCC AC lAT TDOD IfCrTAO 

/ / HDUKtbs Or 101 IKKr VtLlOK 


1 1 70 


UOOUZH 


PFUEC=2H 


Qnnoccc or daucd roii tdqp ucnno 
/ / huuklas ur ruHLK rniL iKnr vlliuk 


1171 


nnnn7n 
OOOOjO 


EMTVECs 


30 


onnoree ne cmt iicrTno 
/ / HUUKbaa Ur tnl VLLIUK 


1172 


OOOOjt 


TRRPVEC 




• onnoccc nr toud i/crTno 
/ / HUUKfcaa Or IKHr VtLlUK 


1173 


OCOObO 


TKVECs 


60 


ADDRESS OF TTY KEYBOARD INT. VECTOR 


n7U 


00006M 


TP\/EC=6H 


ADDRESS OF TTY PRINTER INTERRUPT VECTOR 


1 1 b 


UUU 1 1 H 


PORVEC= 


IIH 


■ Qnnorcc nr HoyMP pqditv coons upttab 

/ / HUUKLdd or nH/Tll rHK 1 1 T LKnvn VL^ 1 Un 


1 1 1 b 


UUUZ4U 


P1RVEC= 


2H0 


onnorcc nr pi on \icfj(\o 


1 1 


nnn9uu 


FPEUEC= 


2HH 


annBPC<\ np PinoTiMf^ phint int urrTnp 


1 1 • a 

1 t 


nnnocn 


nnUEC=250 


onnBFc^ HP liPn mght prror tpop ufcjao 

t t nUv^bdw Vl 1 iCI I \ lUI 1 1 t^^VI\ 1 f\nr vl^ i vr 


I W , 
1 f cn 

1 1 3U 




.CLOCK ADDRESS 


AND VECTORS 




1 1 CI 


1 79Cbn 
1 r £SHU 


PLKCSRs 


1725H0 


. KU1 l-P 


I 1 

I I o<. 


nnni nu 

UUU 1 UH 


PLKVEC= 


lOH 




• 1 C "7 

i 1 b J 


1 < r dHD 


LKS= 


1775'*6 






nnni nn 

UUU 1 UU 


LKVEC= 


100 








LPS= 


1775m 




1 1 OL. 
I ISO 


1 77C 1 C 

1 f f 3 lb 


LPB= 


177516 




1 lor 










1 loo 




,PHn.Tn02/TE16 


REGISTERS 




1 * OQ 

1 io9 




TMCSls 


172HH0 




1 1 on 










I 17 1 




Tn02 TElfc INDEX VALUES 




1 1 7£ 


nnnnnn 

UUUUUU 


CS1 = 


00 


, CONTROL STATUS SI 


1 1 7 J 


nnnnn'? 

UUUUUi^ 


UC = 


02 




4 4 Oil 


nnnnnii 

UUUUUH 


Bfl= 


04 




4 « oc 

I ITD 


nnnnnt 
UUUUUb 


FC = 


06 


PRQnP COUNT 
/in ra lb V V vi^ 1 


4 4 0£. 
1 170 


nnnm n 


CS2= 


10 


.CONTROL STOTUS 12 


4 4 07 

1 l7r 


nnnm > 


DS= 


12 


. OR 1 UE STATUS 


4 4 OO 

1 178 


nnnn4 ii 
UUUU 1 H 


ERs 


m 




1199 


000016 


RS= 


16 


.ATTENTION SUMMARY 


1200 


000022 


DB= 


22 


.DATA BUFFER REG 


4 


nnnn9u 

UUUUUH 


nR= 


21* 


.MfllNTENfMCE REG 


1 


nnnn?fc 

UUUU^O 


DT= 


26 


/DRIVE TYPE REG 




UuUU*3U 


SN= 


30 


.SERIAL NUMBER REGISTER 


I fcU'* 

1 "nc 


nnnm9 

UUUUO^ 


TC = 


32 


. TAPE CONTROL REG 


I .Us 
1 ZKib 




SBTTL 


Tt10:/TE16 


PEGISTEP BITC 


1 ^(17 
1 /U' 




PHCS1-CS1(R5) 






1 ^Us 


nnnnn 1 
UUUU J 1 


G0= 


1 




1 


nnnnnn 

UUUUUU 


NOP = 


0 




4 9 1 n 


nnnnn? 

UUUUUU 


PUDOFF= 


2 




4 9 4 4 

IZl 1 


nnnnnt 
UUUUUb 


RU0= 


6 






nnnm n 

UUUU I U 


0RYCLR= 


10 




1917 


UUUU^D 


UFnKs 


26 




1 9 1 li 


nnnn9u 

UUUUUH 


ERASE: 


24 




1 9 1 1 


nnnnnn 

UUUU JU 


SPCFUD= 


30 




1 ''Id 


000032 


SPCREV= 


32 




1217 


000060 


UCHKF= 


50 




1218 


00006b 


UCHKP= 


56 




1219 


00G060 


UFUD: 


60 




1220 


000070 


RDFUD= 


70 




1221 


000076 


RDREV= 


76 
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12Z2 


000100 


IE = 


100 


1223 


000200 


RDY= 


200 


\2Z^ 


OOOsOO 


nib= 


HOO 


122S 


001000 


R17s 


1000 


122b 


002000 


PSELs 


2000 


1227 


MMla AAA 

00>4000 


DVR= 


MOOO 


1228 


AM A A A A 

020000 


nCPE = 


20000 


1229 


Ala AAAA 

0>40000 


TRE = 


!• A A M M 

40000 


1230 


100000 


SC = 


A AAAAA 

100000 


1231 




Mll^MM ^#*MifM^ ^ 

/ RHCS2-CS2(R5) 




1232 


000000 


DUO: 


0 


1233 


A A A A A m 

000001 


DU1 = 


1 




A AAA A O 

00C002 


r\v<0 

DV2: 


M 

2 




000003 


Dw3= 


3 


1 Z^<9 


OOOOOH 


DVM = 


1* 


1 zz~ 


000005 


DV5= 


5 




OOOOOb 


n\i^ _ 

DUb= 


b 


1239 


000007 


DU7 = 


7 


12*40 


000010 


D n t . 
DH I = 


4 n 
10 


12S I 


rmnn on 

000020 


PHTs 


on 

20 


12SZ 


UOOOhO 


CLRs 


HO 


12'43 


□00100 




4 nn 

100 


12'4'» 


000200 


ORs 


onn 
ZOO 


12M5 


□0U400 


nDrt = 


11 nn 
40U 


1ZM6 


uuiuoo 


MVC * 


1 nnn 
1 OOU 


1 ZH7 


nn onnn 
OOZOOO 


ruc = 


'jnnn 
ZuOO 


1 ZHo 


nnii nnn 
OOHOUU 


Ntn= 


HUUU 


1ZH9 


n 4 nnnn 
OIUUUO 


urn* 


1 UUUU 


1250 


ozoooo 


Urts 


ZDOUU 


1251 


All nnnn 




iinnnn 


1252 


1 00000 


DLT = 


1 OOOOD 


1253 








1254 


000001 


CI O- 


« 

1 


« OP P 

1255 


000002 


oOI = • 


Z 


« OP ^ 

125b 


OOOOOH 


T94U * 


H 


« OP ■*» 

1257 


OOUOIO 


1 no • 


1 n 

1 0 


• OP O 

125S 


000020 


5DmN= 


'^n 
ZU 


« OP n 

1259 


OuOOHO 


DCC- 


un 


I^dO 


nnn t nn 
000100 




1 nn 

lUD 


iZbl 


A A A on A 

000200 


DRt= 


ZOO 


I2t>^ 


AAAIb aa 

OOOHOO 


DrR = 


11 nn 
**00 


1263 


002000 


TAT. 


*>nnn 


iZb** 


004000 


1 IDl * 


unnn 


« O^ P 

12b5 


n 4 nnnn 

010000 


MAI • 


1 nnnn 
1 UUUU 


l2bb 


OZOOOO 


D 1 D* 

r 1 rs 


4 nnnn 


lZb7 


OHuOUU 


r DO- 


unnnn 

HUUUU 


« O^ o 

IZbs 


1 UOOOO 


QTO* 

H 1 n- 


1 .innnn 
1 uUUUU 


I2b9 




DliCD CD I DC > 




1270 


nnnnn 4 

000001 


1 1 r — 


• 

I 


1271 


nn Anno 

000002 




Z 


1 „ 


nnnnnu 


PMP- 


u 


1273 








12'»» 


000020 


FflTs 


20 


1275 


OOClOO 


INCVRE= 


100 


127b 


000200 


PEFLRC= 


200 


1277 


ooo^oo 


NSG= 


^C0 
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12"8 


001000 


FCE = 


1000 


1279 


002000 


CSITtIs 


2000 


1280 


004000 


NEFs 


4000 


12S1 


010000 


OTEs 


10000 


1282 


020000 


OP Is 


20000 


1283 


040000 


UNS= 


40000 


\2S^ 








128B 




,RHriR-nR(R5) 






nDninn 






1287 








12S8 




,RHDT-DT(R5) 




1289 


002000 


SPR: 


2000 


12?Q 


010000 


CH7= 


10000 


1291 


040000 


TfiP = 


40000 


1 292 
129: 




.RHTC-TC(R5) 




129>4 


000300 


NORnils 


300 


1295 


000320 


conus 


320 


129b 


000000 


BP 1200= 


0 


1297 


000400 


BPtSSbs 


000400 


1298 


001000 


BP 1800s 


00100C 


1299 


002000 


PElbOO= 


002000 


1300 


100000 


flCCL = 


100000 


1301 








1302 




INSTRUCTION EQUATES 


1303 


104400 


HLTs 


TRAP 


1304 


104000 


SCOPES 


EtiT 


1305 


000004 


TYPES 


lOT 


130b 








1307 




.niSCELLRNEOUS 


EQUATES 


1308 


005730 


OUTBUFs 


INIT 


1309 


177400 


FRflCNTs 


-25b 


1310 


1 77fa00 


URDCNTr 


-128 


1311 




.flSCtI EQUATES 




1312 


000003 


CNTRLC= 


3 


1313 


00U01 1 


HT= 


11 


13m 


000012 


LF = 


12 




0000 IB 


CR = 


15 


: :ic 


000017 


CNTRLO= 


17 


! :i " 


000025 


CNTPLUs 


25 



I 3 

7 09 48 PAGE 34 



SEQ 003^ 



,OTPUT BUFFER START AT BEG OF PROGRAM 

; FRAME COUNT 
UORO COUNT 

.ASCII CODE FOR CONTROL C ( C) 

/ASCII CODE FOR HORIZONTAL TAB 

.ASCII CODE FOR LINE FEED 

.ASCII CODE FOR CARRIAGE RETURN 

■ASCII CODE FOR CONTROL 0 f 0) 

ASCII CODE FOR CONTROL U ( U» 
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1318 






, SETUP 


TRRP VECTORS 




1319 




oooom 




sTBlTVEC 




132C 


0000 m 


00001b 




. UORO 


*Z 


,SET 'T- TRAP TO TIMER ROUTINE 


1321 


OQOOlb 


000000 




UORO 


HRLT 


, PRIORITY LEVEL 7 


1322 


000020 


00233b 




UORO 


. TYPE 


;SET lOT TRRP TO TYPE ROUTINE 


1323 


000022 


000000 




UORO 


0 


;PRIOTITY LEVEL 0 


132s 


00002S 


00002b 




UORO 


PFVEC+2 


,POUER FRIL TRRP TO HRLT 


132B 


00002b 


000000 




1 IAD n 


um T 
MHLT 


;RT PFVEC+2 


132(> 


000030 


00m32 




UORO 


SCOPE 


;SET EHT TRRP TO SCOPE ROUTINE 


1 iZf 


0000 J Z 


nnn 7un 
000 JHD 




UORO 


3>40 


' DO 1 no 1 TV 1 CMCt 7 


1328 


00003S 


003b5b 




UORO 


. HLT 


,Sn TRRP TRRP TO HLT ROUTINE 


1329 


00003b 


0003S0 




UORO 


3S0 


, PRIORITY LEVEL 7 


1330 




OOCObO 




sTKVEC 






1331 


000060 


003bl2 




UORD 


TKISR 




133: 


00C0b2 


0003S0 




UORO 


3S0 




1333 
133S 








.SOFTURRE SUITCH REGISTER LOC 17b 


1336 




00017b 




= 17b 






1 Tit 


UUU 1 c 


nnnnnn 




SUREG: 


0 


/SOFTURRE SUITCH REGISTER 


1337 














1338 




000200 




= 200 






1339 














13S0 


000200 


005067 000600 




CLR 


PCNTR 


/INIT PROGRRn PRSS INDICRTOP 


13m 


00020S 


00013' 005"'30 




JHP 


dl 1 N 1 T 


;G0 TO STRRT OF PROGRRfl 


13S2 
13S3 




000500 




=500 






13SM 




000600 


STKPTR= 


bOO 




; STACK 


t3S5 














\3Hb 




001000 




= 1000 






13S7 






,PROGRflh TAGS 






13S8 


001000 


177570 


SUR- 


177570 




; SUITCH REGISTER 


13S9 














13B0 


001002 


000000 


PfiFLG 


UORO 


0 


;PRSS INDICRTOk 


1351 


001 OOH 


000000 


PCNTR 


UORO 


0 




1352 














1353 


00100b 


000000 


SCPODR 


UORO 


0 




135S 


001010 


000 


ORUNUM 


BYTE 


0 


,Tri02 DRIVE UNDER TEST 


1355 


001011 


000 


SLUNUn 


. BYTE 


0 


,TFlb SLRVE UNDER TEST 


1356 


001012 


000000 


SLVPTR 


UORO 


0 


, POINTER TO SLRVE TRBLE (SLVTBL) BELOU 


1357 


001014 


172SS0 


TMBfiSE 


UORD 


THCS1 


.BRSE RDDRESS OF Tn02/TElb REGISTERS 


1358 


00101b 


000000 


flTIME 


UORO 


0 


;CONTRINS 'TICK' COUNT 


1359 


001020 


000020 


flTiriTBL 


BLKU 


lb 


;ERCH ENTRY CONTRINS TlhE FOR FUNCTION 


I3b0 










; ENTRIES RRE tlRDE BY 'SCOPE' ROUTINE 


I3bl 


OOlObO 


000020 


GflPTBL 


BLKU 


lb 


, TIMES RECORDED BY 'GRP CONSlSTRNCY' TEST 


1362 


001120 


000000 


DELTIfl 


UORO 


0 


.VRRIBLE DELRY 


I3b3 


001122 


000000 


OCTRLO 


UORD 


0 




l3bS 


001 12S 


000 


GPP. 


BYTE 


0 


.CONTRINS GRP « (USED FOR TST 021) 


I3b5 


001125 


000 


ITCNT: 


. BYTE 


0 


, ITERRTION COUNT 


13bb 


00112b 


000 


TSTNUn 


BYTE 


0 


,TEST • 


I3b7 


001127 


000 


ERFLG- 


. BYTE 


0 


, ERROR FLR6 


1368 


001130 


000 


PRGFLG- 


BYTE 


0 


.PROGRRn FLRG 


1369 


001131 


000 


UNTFND 


. BYTE 


0 


.UNIT FOUND INDICRTOR 


1370 


001132 


000 


TYPFLG 


BYTE 


0 


.INDICRTES IF DRIVE IS NRZ ONLY 


1371 


001133 


000 


NRZFLG 


BYTE 


0 


1372 


001 US 


000 


flSFLG 


BYTE 


0 


, 1 ''O = YES/NO 


1373 




001136 




EVEN 
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137M 


001136 


030H60 




DIGTRB 


"01 






1375 


ooimo 


031462 






"23 






1376 


001 m2 


032464 






"45 






1377 


001 


033466 






"67 






1378 


001 m6 


034470 






"89 






1379 


001150 


000006 




ODIGITS 


. BLK6 


6 


, RESERVE SPACE FOR CONVERTED DIGITS 


1380 


001156 


000 






. BYTE 


0 


;TERniNnTOR 


1381 




001160 






EVEN 






1382 


001160 


OOGOlO 




DRVTBL. 


. BLKB 


8 


;A 0/-1 s DRIVE NOT TO BE/TO BE TESTED 


1383 


001170 


000100 




SLVTBL 


. BLKB 


64 


;A 0/-1 s SLAVE NOT TO 3E/T0 BE TESTED 


1384 


001270 


000110 




INBUF 


BLKB 


72 


, TELETYPE INPUT BUFFER 


138S 


OOIHGO 


005015 


000 


CRLF: 


. flSCIZ 


<CR><LF> 


;niSCELLANEOUS ASCII CHARACTERS 


1386 


001403 


134 


000 


BKSLSH 


. flSC 1 Z 






1387 


001405 


060 


000 


ECHO 


, flSCIZ 


■0' 




138S 


001407 


007 


000 


BELL. 


. flSC 1 Z 


<7> 




1389 


001411 


055 


000 


DASH 


.flSCIZ 






1390 


001413 


040 




SPPCE2: 


ASCII 


* 1 




1391 


001414 


000040 




SPACE 


ASCIZ 


1 t 




1392 


00141fc 


004476 


COO 


RNGTRB. 


ASCIZ 


' >-<HT> 




1393 




001422 






EVEN 
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SEQ 0037 



1394 








SBTTL 


TIME SPECIFICATION TPBLE 






1 79(^ 
1 J 73 








,THE BELOU TPBLE CONTAINS THE 


SPEC in ED FUNCTION TIMES IN TENS OF 


1 79^ 

1 07D 










kiOTr TUQT uurtj 


TIMFC DOC Tvprn 


THAT THEY ARE TYPED IN 


1 797 








M 1 rpocr roMHC 
/ n 1 ^nvacLunua 


vol nrrtnuiiiu m 


U 1 






1 79R 

1 ^70 








rOPMQT IC 










1 799 

1 J77 

1 UQQ 








unsn 


MQy M 1 M 

ntiA/ n 1 n 




r 1 iijr T 1 Aki 
r UnL 1 1 <jn 


TCCT 1 


1 ^ uu 


no 1 1422 


uuuuuu 


OQOOOO 
uuuuuu 


dl iniDk. HURU 


n n 

U/ u 












U«>wU3U 


mii77n 

U«>3^«>U 






icii n-icin n 

, 1 St. U 1 9U U 


UB 1 TF TBOM RftT 
HR Mb r nun Q\J 1 


1 d 1 uu 1 


1 un7 


nni u 77 

uu 1 ^ 


uu 1 ooo 


nni si\tk 

uu 1 3^ w 




nnQcn nnft7n 

UU79U. /UUOrU. 


/ 7. 3 O. f 


UBITr CTQBT 
WK lit «> 1 nn 1 


1 d 1 UU^ 




nni u Id 

uu 1 ^ »JW 


nniti72 


nnit>22 




nnfi9n nnscin 


■fi 9-fl c; 

, O. 7 o. o 


uBiTF <:HiiTnnuN 

Nn 1 1 c onu 1 i/vMn 


T^Tnn7 

1 a 1 uuo 




uu 1 ^ 


UU^3UO 


nniuii2 

uu 1 ~ 




ni7i^n noRin 




UBITF STLDOUN 

Hl\ lib 01 UUVHH 


TSTnnu 

1 d 1 UU— 




nni uufe 

uu 1 ttO 


UU r 1 v~ 


UUw w~ ~ 


UORD 


03700 . 03300 


• 77 0-33 0 


READ FROn BOT 


TSTnOS 

1 w 1 UUw 




UW 1 


QQC5QQ 

UUU.IUU 


000404 

uuu~ u~ 


nun V 


00320 . 00260 




BFflD START 








000721 

U WU 1 I 


000651 

UUUU J I 


UORD 


00U(>5 00U25 


;U (i5-i4 25 


READ SHUTDOUN 


TST007 

1 w 1 uu f 


I ~ sj ^ 


QQ1462 

WW 1 ~ O At 


002506 


001452 

UU 1 ~ W At 


UORD 


U 1 i#aU> / WWO 1 Ut 


; 13 5-8 1 


READ SETTLEDOUN 


TSTOlO 

1 10 1 U I u 




uu 1 ~ 


000500 

UUUwUU 


0004QI4 

uuu~ u~ 


UORD 


00320 . QQ26Q 


. 3 2-2 6 


RD REV START 


TSTOll 


1 U 1 1 


noiu72 


000562 

UUU WW a* 


000512 

UUW9 I 4» 


UORD 


00370 / 00330 


;3 7-3 3 


RD REV SHTDUN 

^w nb V wri 1 


TSTQ12 

1 W 1 U I *i 


m 1 2 

1 ~ 1 A. 


uu I « w 


002506 

UU AiWUw 


001452 

UU I T W 


UORD 


01350 y 00810 

u A wau> / uuw i u. 


; 13 5-8 1 


RD REV STLDUN 


TST013 




□01502 

UU i WUAa 


003206 

UU W mUW 


002C56 

UU ^W W w 


UORD 


01670 / 01070 

WtW'Wi /WtW'W* 


; 16. 7-10 7 


TRN RND DLY F-R 


TST014 




uu 1 3Uw 


003206 

UU W AiUw 


002056 

UUfcU^W 


UORD 


01670 .01070 


; 16. 7-10. 7 


TRN RND DLY R-F 


TST015 




001512 

UU I 9 I 


0024 1 2 


001666 

UU A WWW 


UORD 


01290 ,00950 


; 12! 9-9. 5 


GAP SIZE STOP 


TST016 


1416 


001516 


002234 


001522 


UORD 


01180 ,00850 


; 11. 8-8. 5 


GAP SIZE STRT 


TST017 


1417 


001522 


QQ271Q 

UU 4a f AW 


002532 


UORD 


01480 / 01370 


; 14. 8-13. 7 


GAP SIZE INTER 


TST020 


1418 


001526 


002544 


002330 

WW aa W WW 


UORD 


01380 / 01240 

W • W W W« ' w • * W* 


,13 8-12 4 


GAP CONSISANCY 


TST021 


1>419 


001532 


000000 

wuuuwu 


000000 

w wwwww 


UORD 


0,0 


; 0. b-0. 0' 


DUMMY 


TST022 




001 536 

UU 1 


004552 


004406 

WW • 'WW 


. UORD 


02410. ,02310 


;24. 1-23. 1 


DAT TIME 200BPI 


TST023 


1421 


001542 


004540 


004 374 


. UORD 


02400. , 02300. 


; 24. 0-23. 0 


DAT TIME 556BPI 


TST024 


1422 


001546 


004540 


004374 


UORD 


02400. , 02300 


, 24 0-23. 0 


DAT TIME 8006PI 


TST025 


1423 


001552 


004716 


004552 


HORD 


02610. ,02410. 


,25. 1-24. 1 


OAT TIME 1600PE 


TST026 


1424 


001556 


023564 


023254 


. UORD 


10100 ,09900. 


, 101. 0-99. 0 


ERASE 


TST027 


1425 


001562 


024404 


02U074 


UORD 


lOSOO. ,10300 


. 105. 0-103 0 


URT FILE MARK 


TST030 


1426 


001566 


004336 


004172 


UORD 


02270. .02170 


;22. 7-21. 7 


READ 1" TAPE 


TST031 


1427 


001572 


004336 


004172 


UORD 


02270. ,02170 


;22 7-21 7 


RD REV 1" TAPE 


TST032 


1428 
1429 








NOTE TEST 31 


AND 32 REQUIRE 


PRERECORDED 800BP 1 SKEU TAPE 





D2TUG-B Tn02/TE16 DRIVE FUNCTION TlflER 
C2TUGC Pll 02-0EC-77 09 46 



m30 

mil 
m32 
m33 
m3H 

1>435 
1436 

1437 001576 

1438 C01602 

1439 001606 

1440 001612 

1441 001616 

1442 001622 

1443 001626 

1444 001632 

1445 001636 

1446 001642 

1447 001646 
1443 Q016B2 

1449 001656 

1450 001662 
14B1 001666 
1452 0016-': 



H 3 

MOCYll 30(1046) 02-DEC-77 09 48 
GAP TIME SPECIFICATION TABLE 



PAGE 38 



SEO 0038 



SBTTL GAP TIME SPEC IF ICRTtON TABLE 
,TH!S TABLE CONTAINS THE GAP SIZES (IN TENS OF niCROSECONOS) FOR EACH 
.OF THE 16. GAPS ReCOROEO BY THE GAP CONSISTANCY TEST (TST021) 
>NOTE- GAP »'S ARE IN OCTAL. 







UORD 


MAX/ fllN(iO) 


, T 1 nt IN MS ( 1 0 ) 


uHP 


uelrt in ns(iD) 


002602 


002412 


GTlrlTBL UORD 


UlHlO. t 01290. 


,14. 1-lZ. 9 


uHr-O 


n mc 


002652 


002506 


. UORD 


OlHbO. / 01 J9U. 


, 14. 5-1 J. S 


ROD - 4 

UHr-l 


1 u rid 


002734 


002532 


UORD 


DI9OO. / 01 j7D. 


• 4 c n_ 4 7 7 
,15 U"l J. 7 


ROD -9 

uHr A 


0 n HC 

L. U na 


00273H 


002532 


. UOrD 


O19DO. > 01 j70. 


,13. U" 1 J. f 


ROD. 7 
UMr" J 


7 n wz. 
J. U no 








01600 01700 


; 16 0-13 0 


GAP -4 


4 0 MS 


002652 


002260 


UORD 


omso. / 01200. 


;m. 5-12. 0 


GAP-S 


i. 0 US 


002652 


002260 


. UORD 


OtHSO. ,01200. 


;1H. S-12. 0 


GAP-6 


6. 0 MS 


002652 


002260 


. UORD 


01460. / 01200. 


; m. 5-12. 0 


GAP-7 


7. 0 ns 


002532 


002260 


. UORD 


01370. / 01200. 


,13. 7-12. 0 


GAP- 10 


8. 0 ns 


002532 


002260 


UORD 


01370. / 01200. 


,13. 7-12. 0 


GAP- 11 


9 0 MS 


002532 


002260 


. UORD 


01370 ,01200. 


:13. 7-12. 0 


GAP- 12 


10 0 MS 


002532 


002260 


. UORD 


01370. ,01200. 


;13. 7-12. 0 


GAP- 13 


11. 0 MS 


002532 


002260 


UORD 


01370. ,01200. 


; 13. 7-12. 0 


GAP- 14 


12. 0 MS 


002532 


002260 


. UORD 


01370 .01200. 


,13. 7-12.0 


GOP- 15 


13 1 MS 


002532 


00226C 


UORD 


01370. ,01200. 


;13. 7-12 0 


GAP- 16 


14 1 ns 


002532 


002260 


UORD 


01370 ,01200 


; 13. 7-12 0 


GAP- 17 


15 1 MS 



N 3 

DZTUG-B Tt102/TElb DRIVE FUNCTION TiriER MPCyii 30(10Mb) 02-0EC-77 09: PAGE 39 
CZTUGC.Pll G2-DEC-77 09 TEST HEfiCER POINTERS 



1453 






. SBTTL 


TEST HI 


IHSH 






.THE BELOU TRBLE CONTP 


\^SS 


001676 


000000 


NRnPTR: . UORD 


0 


1466 


001700 


015405 


. UORO 


n T001 


1457 


001702 


015427 


. UORO 


fl T002 


1H58 


001704 


015447 


. UORD 


fl. TG03 


1459 


001706 


015471 


. UORD 


fl. TQ04 


1460 


001710 


015515 


. UORO 


fl. TQ05 


1461 


001712 


015537 


. UORO 


fl. T006 


1462 


001714 


015556 


. UORD 


n. T007 


1463 


001716 


015600 


. UORD 


fl. T010 


1464 


001720 


015623 


. UORD 


0. TOll 


1465 


001722 


015645 


UORD 


fl. T012 


1466 


001724 


015672 


. UORD 


fl. T013 


1467 


001726 


015721 


. UORD 


R. T014 


14bb 


001730 


015752 


. UORD 


fl. T015 


1469 


001732 


016003 


UORD 


fl. T016 


1470 


001734 


016031 


. UORD 


fl. T017 


1471 


001736 


016060 


. UORO 


fl. T020 


1472 


001740 


016110 


UORO 


fl. T021 


1473 


001742 


000000 


UORD 




1474 


001744 


016133 


. UORD 


fl. T023 


1475 


001746 


016157 


. UORD 


fl. T024 


1476 


001750 


0162G3 


. UORD 


fl. T025 


1477 


001752 


016227 


. UORD 


fl. T026 


1478 


001754 


016254 


UORD 


fl. T027 


1479 


001756 


016276 


UORD 


fl. T030 


1480 


001760 


01b32l 


UORO 


n. T031 


1481 


001762 


016343 


UORD 


fl. T032 



POINTERS 



;DUnnY TEST 



B ^ 

D2TUG-B Tn02/TE16 DRIVE FUNCTION TinER HfiCYU 30(10»*6) 02-DEC-77 09 HS PAGE MO 
C2TUGC PU 02-DEC-77 09- TEST HEADER POINTERS 



SEQ OOHO 



1H82 
1>48«4 

msb 



m87 


001 7bH 


000000 








m88 


001 7bb 


000000 








m89 


001770 


000000 








m90 


001772 


000000 




















m92 


00177M 


0227b7 


00017b 


176776 


CKSUR 


\>493 


002002 


001120 








m9«» 


00200H 


01b7b7 


176652 


177752 




l«»95 


002012 


0H27b7 


177b00 


1777MH 




m9b 


002020 


0227b7 


M#%MMM ^ 

000007 


17773b 




1»497 


00202b 


001 10b 








m98 


002030 


ooooot 


01b3b5 






1'499 


00203>4 


M M MM M 1 • 

OOOOOH 


01b372 




CNTLU 


1600 


0020>40 


017702 


17b73'4 






ISCl 


0020HH 


00'47b7 


nnnr f ii 

OOOBdM 






1B02 


002050 


COOOOH 


n A f Ii n 4 

01b401 






1503 












150H 


00205H 


005ub7 


1 7770b 






160S 


0020b0 


012767 


0000U7 


1 77702 




160b 


0020bb 


□OHZbZ 


□□□1 bH 




4 C 

Is 


1607 


002072 


nil ^ 

0H27b7 


1 77b00 


i77bb'* 




1608 


002100 


1227b7 


000025 


1 77bbb 




1609 


00210b 


OOlOOl 








1610 


0021 10 


000761 






35 


1611 


002112 


1 ZZ7b7 


GOOD 15 


1 7-'t'4'4 


25 


1612 


002120 


1)01012 








1613 


002122 


0127b7 


000200 


1 e 7bHZ 




151H 


002130 


00'»7b7 


MMM o 

000230 






1515 


002 13H 


0227b7 


nnnnn "T 

000007 


1 77626 




I6lb 


002m2 


001 03t 








1517 


002m>4 


Mn#iii 

OOOH 37 






off 


:518 


002 mb 


1227b7 


MM M M ^ M 

OOOObO 


4 4 n 

1 77610 


li c 

IS 


1519 


002 15H 


00300H 








1520 


00215b 


1227b7 


nnnnz. "t 

000067 


1 77600 




1521 


0021 bH 


nn Ann 

002003 








1522 


0021 bb 


nnnnnia 

OOOOOH 


oibm 1 




91 


1523 


MM^« ^M 

002172 


0007Hb 








152'4 


0021 7>4 


nn^ ^ 

00b3b7 


177bbo 




bS 


15^9 


OUZZOO 


00636/' 


1 r r bb^ 






152b 


00220H 


00b3b7 


17766b 






1627 


002210 


m27b7 


000060 


1775»46 




1628 


00221b 


16b7b7 


1775H2 


1775H2 




1529 


00222M 


0053b7 


1775H0 






1530 


002230 


00175b 








1531 


002232 


000715 








1532 


00223tt 


01b777 


177526 


1 76636 


7S 


1533 


0022H2 


0007H0 






OUT 


153H 


0022H>( 


000207 







1636 



, CHECK 


SUITCH REGISTER 


ROUTINE CHECKS FOR G TO 


RLLOU CHRNG 


,0F LOC 


. 17b. 






;CflLL IS BY URY OF JSR 


PC, CKSUR 




.LOCRTIONS USED. 






TIB: 


. UORD 0 






TEMPST. 


. UORD 0 






COUNT 


. UORD 0 






RDSU. 


. UORD 0 






cnp 


tSUREG/ SUR 


/SOFTUflRE SUITCH 


M r tfft M A r A* 9 K A 

REG PRESENT 


BNE 


OUT 


/NO/ GET OUT 




nov 


TKB.TIB 


;flND STRIP OFF 




BIC 


1177600/ TIB 


/THE GARBRGE 




CMP 


I7,TIB 


/ IS IT R < G> 




BNE 


OUT 






TYPE,L. 


CNTG 






TYPE,L 


SUR 






nov 


aSUR,R2 






JSR 


PCTYPOCT 






TYPE,L. 


NEU 






CLR 


TEnPST 






nov 


117. COUNT 






JSR 


PCTTIN 


MM M^MM M ^ilMnM^V^n 

;G0 RERD R CHRRRCTER 




BIC 


«177b00, TIB 


/STRIP OFF GRRBRGE 




cnPB 


»25.TI6 


; IS IT R U? 




BNE 


IS 


M M Ml l^ll 1^ LiMV 

/BRANCH IF NOT 




BR CNTLU 


^k^^%MV 1^ M 

/STRRT OVER 




cnPB 


«15,T(B 


/IS IT fl <CR>? 




BNE • 




.MM Mk. aa aM 

;6RRNCH IF NOT 




nov 


1200, RDSU 






JSR 


PCTCRLF 


/ECHO IT UITH <Lr> 




cnp 


» 7, COUNT 


.iiMM 1 V ^iMMT ^1 iMB 

;UflS IT FIRST CHRRRCTER 




BNE 


7% 


;CHRNGE SUR IF NOT FIRST 


ONE 


BR 


OUT 


/GET OUT 




CnPB 


«60,TIB 






BGT 


5S 






CnPB 


«67,TI6 






BGE 


6S 






TYPE.L 


QUEST 






BR 


3* 


; STRRT OVER IF NOT LEGRL 


CHRRRCTER 


flSL 


TEMPST 






flSL 


TEMPST 






flSL 


TEMPST 






BICB 


«6G,TIB 


Mr V a.aavvt.« MMitVvj 

/GET NITTY-GRITTY 




BISB 


TIB, TEMPST 






DEC 


COUNT 


/ONLY UHNT 6 DIulIa 




BEG 


5t 






BR 


\S 






nov 


TEMPST, aSUR 


.CHRNGE SUITCH REGISTER 


CONTENTS 


BR 


8S 






RTS 


PC 







c 

DZTbG-B TMOZ/TElb DRIVE FUNCTION TIMER MflCYU 30(lOHb) 02-0EC-77 09: PAGE «♦! SEQ OOm 

CZTUGC Pll 02-DEC-77 09 TEST HEADER POINTERS 



1536 



1^37 












,TTY READ SUBROUTINE»«$m««« 


1B38 


















1539 


002246 


006067 


176306 




TTIN: 


CLR 


TKS 




15^0 


002262 


005067 


175304 






CLR 


TKB 




15m 


002266 


006067 


177502 






CLR 


TIB 




15^2 


002262 


006267 


175272 






INC 


TKS 




1543 


002266 


105767 


1 76266 




TTINI 


TSTB 


TKS 




1544 


002272 


100375 








BPL 


TTINI 




1545 


002274 


016767 


176262 


177462 




nov 


TKB. TIB- 




1546 


002302 


106767 


176266 




TTIN2. 


TSTB 


TPS 




1547 


002306 


100376 








BPL 


TTIN2 




1548 


002310 


116767 


177460 


176260 




novB 


TIB.TPB 




1549 


002316 


000207 








RTS 


PC 




1550 


















1551 












. SBTTL 


PROGRAM SUBROUTINES 


1552 












SBTTL 


TYPE SUBROUTINE 


1553 










..ROUTINE TO TYPE ASCII MESSflGE 


MESSAGE MUST TERMINATE WITH A 0 BYTE 


1554 










.;THE ROUTINE MILL INSERT NUtlBER OF NULL CHARACTERS AFTER A LINE FEED 


1556 










,/CALL- 


TYPE 




/;A TRAP TYPE INSTRUCTION 


1556 












nESADR 




./MESADR IS FIRST ADDRESS OF ASCIZ STRI 


1557 


















1558 










, , TAGS 


USED BY 


THE TYPE ROUTINE 


BELOU 


1569 




0000.1 








4HT=11 




. ; HOR 1 ZONTAL TAB 


1660 


002320 


000 






SNULL. 


. BYTE 


0 


./CONTAINS NULL CHARACTER 


1661 


002321 


002 






SFILL 


BYTE 


2 


..CONTAINS » OF FILLER CHARACTERS 


1662 


002322 


000 






5TPFLG 


BYTE 


0 


..CONTAINS TELEPRINTER AVAILABLE FLAG 


1663 
















// 0/377 s AVAIL/NOT AVAIL 


1664 


002323 


000 






STKFLG 


BYTE 


0 


./CONTAINS KEYBOARD AVAILABLE FLAG 


1665 


002324 


177564 






5TPS 


UORO 


177564 


..ADDRESS OF TLEPR INTER STATUS REGISTER 


1566 


002326 


177566 






5TPB. 


. UORD 


177566 


ADDRESS OF TELEPRINTER DATA BUFFER 


1667 


002330 


000 






SCHARCNT- BYTE 


0 


^ A & 1 V A AA.AA A* A^ ^A ■ A A A V U A ^ A 

..CONTAINS » OF CHARS TYPED 


1568 


002331 


000 






«CNTRLO 


BYTE 


0 


..LUnlHIns tUnlKUL 0 tnHK ( Ir iTrtU) 


1569 


002332 


006016 


000 




SCRLF 


ASCIZ 


<15><12> 
















EVEN 






1571 


















1672 


002336 


010046 






TYPE. 


MOV 


RO, -(SP) 


..SAVE RO 


1573 


002340 


017600 


000002 






MOV 


a2(SP).R0 


..GET MESSAGE ADDRESS 


1574 


002344 


062766 


000002 


000002 




ADD 


»2,2(SP) 


. .ADJUST RETURN PC 


1576 


002352 


106067 


177753 






CLRB 


5CNTRL0 




1576 
1677 


002366 


10576? 


177747 




TYPEl 


TSTB 


4CNTRL0 


BRANCH IF CONTROL 0( 0) WASN'T TYPED 


1578 


002362 


001410 








BEG 


TYPE2 




1679 


002364 


000004 


002332 




TCRlF 


TYPE.SCRLF 


..TYPE <CR><LF> 


1680 


002370 


106767 


177376 






TSTB 


ROSH 




1681 


002374 


100006 








BPL 


TYPE3 




1682 


002376 


006067 


177370 






CLR 


RDSU 








nnn^n? 








RTS 


PC 




1684 


002404 


112046 






TVPEZ 


novB 


(RO)*. -(SP) 


..PUSH CHARACTER TO BE TYPED ONTO STACK 


1686 


002406 


001003 








BNE 


TYPE4 


..BRANCH IF NOT THE TERMINATOR 


1686 


002410 


006726 








TST 


(SP) + 


..POP TERMINATOR CHAR OFF THE STACK 


1587 


002H12 


012600 






TYPE3 


riov 


(SP)*.RO 


..RESTORE RO 


1688 


002Hm 


000002 








RTI 




..RETURN TO CALLER 


1689 
1590 


002416 


122716 


000011 




TYPE4 


cnPB 


»SHT, (SP) 


BRANCH IF HORIZONTAL TAB 'HT^ 


1691 


0024 Z2 


001446 








BEQ 


9S 





D ^ 

DZTUG-B Tn02/TE16 DRIVE FUNCTION TIMER nRCYll 30(10i46) 02-DEC-77 09 H8 PRGE ^2 
CZTUGC Pit G2-0EC-77 09 H6 TYPE SUBROUTINE 



SEQ 00^2 



1 

1 37^ 




00U7fc7 


onoo2fe 








9C 5% 


1 Ilk ^nrmn^ iki\ 


1 CQ7 

1 37 J 


nn^u 7n 










L 1 ir D 




THrfK IF CHARflfTFR Ufl^ A LINF FFFD 


1 1^QU 
1 D7"t 


nn^u 7u 


nni Ten 

UU 1 ^3U 








DHL 


TYPF 1 


BRANCH IF NOT LINF FFFD 


1 (^Qi; 

1 373 


nn9U7(> 


01 (k7Uf> 


1 77656 

Iff www 






noi/ 


(NULL. - (SP ) 


/.GET • OF FILLERS REQUIRED AND FILLER 

/ / Ub 1 IT V( ( 1 bkkl\«# 1^ b W ) k 1/ ■ ■ k k k 


















/ . CHARACTER 


ib7f 


















1 370 




105766 








DECB 

Wk ^ D 


1 (SP ) 


,,DECREnENT FILLERS REQ COUNT 


1 377 




002770 








BLT 


3( 


..'BRANCH IF NO nORE FILLERS ARE REQUIRED 

/ / b n ni Tk n ■ V ( * V l IVn k ■ IkkkV^W rtJ\ k I\ k VW > k 1/ 


lOUU 




nOU7f>7 


nnnnn2 






KB 

J OR 


Pf ^\ 

r ^ / 39 


..TYPE FILLER CHARACTER 

//I Ilk ■fkkk'^ ^ nni\ rik • k i\ 


1 OU 1 




000772 








BR 






1 DU^ 


















1 DU J 




1 05777 

1 U3 Iff 


1776U2 

If' W~ *p 




5% 


TSTB 


«lf TPS 


;/UAIT FOR OUTPUT DEVICE 

r w F*r» I • f WF^ VW ■ • W • wk V » ^b 






100375 








6PL 


-H 








122737 

I i*§m t miff 


000017 

WW WW 1 ■ 


002331 

UU4a«J W t 




cnPB 


•17/ fitfCNTRLO 


//CHECK IF CONTROL 0 UAS TYPED 


1 wUw 




WW 1 ~ W w 








BEQ 


6S 


//STOP TYPING nESSAGE IF 0 UAS TYPED 


lfe07 




1 16677 

i t WW t I 


000002 

W W WW w*« 


177b2'4 




novB 


2(SP), a%TPB 


//OUTPUT CHARACTER 


1 ouo 




122766 

I AiAifl WW 


000015 

WWWW I J 


000002 

uuwww ^ 


6% 

W 9 


lMPB 


•15, 2(SP ) 


//BRANCH IF NOT <CR> 


1 wU 7 




001003 








BNE 


71 




IblG 


002B12 


105067 


177612 






CLR6 


SCHflRCNT 


//-CLEAR CHARACTERS TYPED COUNT 




002516 


0001406 

WWW » WW 








BR 


85 




1 D 1 ^ 






00001 2 

UUUU ■ « 


000002 


75 


cnpB 


«12.2(SP) 


; /BRANCH IF <LF> OR 'NULL' 


1 O 1 «d 




002002 

UW«iUU 








BGE 


85 




1 h 1 U 




1 05267 








INCB 


5CHflRCNT 


//INCREnENT CHARACTER TYPED COUNT 


1 D 1 9 




000207 

UUW«a W < 






8S 


RTS 


PC 




1 w 1 w 


















1^17 
1 O 1 ( 










,,H0RI20NTPL TRB <HT> PROCESSER 




1618 


002B36 


112716 


000040 




9S 


novB 


mo, (SP) 


/•/LOAD 'SPACE' 


1619 


0025H2 


00H767 


17771Q 




lOS 


JSR 


PC,B4 


TYPE SPnCE 


1 D^U 


Q025U6 


\ 117^7 


QQ0007 

U WUU W I 


1 7 ''554 




BITB 


«7,5CHRRCNT 


/'■TYPE SPACES UNTIL A nULTIPtE 


1 

1 1 


0075i;U 

UUXi33^ 


UU 1 «J ■ ^ 








BNE 


105 


//OF 8 CHARACTERS HAVE BEEN TYPED 


Mill 


□02556 


105726 








TSTB 


(SP)* 


,;POP SPACE 


1623 


□02560 

U Wm9WW 


00067b 








BR 


TYPEl 


//GET NEXT CHARACTER 


162^ 










.SUBROUTINE TO 


SnVE GENERAL REGISTERS ON THE STACK 


1626 










,CflLL 


SAVE 






1 fe27 


002562 


0105<4b 






SAVE 


nov 


R5, -(SP) 


/SAVE REGISTERS ON THE STACK 


162S 


Q0256U 

Ww*«3W~ 


OlOUUb 








nov 


R4, -(SP) 




1629 


002566 


0103Hb 








nov 


R3, -(SP) 




1630 


0025? 0 


0102H6 








nov 


R2, -(SP) 




1 0 J 1 




ni ni u(> 








nov 


Rl, -(SP) 




ID 




0lQQll6 








nov 


RO, -(SP) 


/GET RETURN PC 


1 D J J 


00257*. 


01 ft6U6 


0000 lU 

UUUU 1 ~ 






nov 


m(SP)/-(SP) 


1(>7U 


002f>Q2 


000207 

UUW As w ■ 








RTS 


PC 


/RETURN 


1616 

1 WWW 










, SUBROUTINE TO 


RESTORE GENERAL 


REGISTERS FROn THE STACK 


1637 

1 W ^ ■ 










;COLL 


RESTORE 




,nOVE RETURN PC 


163S 

1 W«#W 


□026Q>t 

U W mWU • 


012666 

W a wWWW 


0000 m 

WWWW * " 




RESTORE: PIOV 


(3P)+, m(SP) 




WW AtW t W 


012600 

W i M W WW 








nov 


(SP)+,RQ 


/RESTORE REGISTERS 


16M0 


002612 


012601 








nov 


(SP)*,R1 




ibm 


0026 m 


012602 








nov 


(SP)*,R2 




16M2 


002616 


012603 








nov 


(SP)+/R3 




lbM3 


002620 


01260M 








nov 


(SP)+,R'4 




16>4H 


002622 


012606 








nov 


(SP)*,R5 


, RETURN 


16^S 


00262M 


00C207 








RTS 


PC 



lb4b 

lfeH7 -SUBROUTINE ^0 CONVERT OCTAL DATA TO ASC I 



DZTUG-6 Tn02/TE16 DRIVE FUNCTION TlflER 
C2TUG'- PU 02-0EC-77 09 



4 f li O 

lb**© 








lfe49 








IbSO 








ibbi 


OOZbZb 


4 4 n£. £. ^ 


1 rbiUU 


« £ C 


UOZbJZ 


□UUHDZ 




IbbJ 
























Ibbb 








lbb7 
















ibb? 


UUZbJH 


4 ncn 77 


UOl 13Z 


ibbO 


UU£.bHn 






ibbi 


UUZbHO 


nnu 7£.7 


4 777 4 £. 


1 £- £- ^ 


OOZbiH 




nn 1 1 cn 
UUI 1 bU 


ibbo 


nn7ccn 


nncnn? 




1 bbH 


nn7£.c7 
□□ZbbZ 


n 4 n7n4 
U lUZUl 




1 bbb 


UUZbbH 


nnc 7n7 
UUb JUZ 




Ibbb 


nn7£.C£. 
uUZbbb 


nnti n7 




Ifabr 


nn7£.£.n 
UUZbbU 


ni 77nn 
UiZr UU 


nnnrne. 
UUULUb 


1 £.£.0 
Ibbo 


UUZbbH 


nnnunii 




ibb7 








ibr U 


UUZbbb 


nnfc7n7 




lb<'i 


nn9t7n 

UU^br u 


uub 1 u J 




Ibf L 


nn7t79 

UUAbr A 






Ibr J 


UUZbr H 


nni 7711 




1 bf H 


UU^br b 


ni '>70' 
u 1 L 


nnnnn? 


Ibr b 


nn77n7 


1 1 b Jibt 


nni 1 7t» 

UU 1 1 JD 


Ib^'b 


nn77n£. 
UUZrUb 


UUbUU J 




4 £.77 


nn77 4 n 


UUbJUU 




lb<'8 


nn77i 7 


UUi Jb9 




« £.70 




1 nC777 

1 us f ■if 


nni 1 79 


1 <.on 
iboU 


UUZr ZU 


(Jul uu^ 




Ibol 


UUZ' ZZ 


nnnnnu 


nr 1 1 tn 


ibcZ 


UUZr ibb 






1 L.O 7 

ibo^ 


UUZr Zb 


UUH r bf 


Iff b3^ 


1 boi 


UU^r Jib 


nnn9n7 

UUUibUr 




I bob 








ibob 








1 <^07 

Ibor 








1 boa 








lb07 








1 con 
IbyU 








1 b7l 


uu£.r m 


1 1 nt. 77 


nni 1 

UU i 1 


4 £.07 

lb7Z 


UUZr HU 


nnnii n 7 




4 £.07 








4 coil 








4 £.OC 

ib9b 








4 £.QC 

ib9b 








4 £.07 
1 Vjf 








1 070 








lb99 


0027^b 






1700 


0027Hb 


OO** 7b7 


177bl0 


1701 


0027S2 


006000 




1702 


00276H 


01270H 


001160 


1703 


0027b0 


006003 





flfiCYU 30(10Hb) 02-DEC-77 
TYPE SUBROUTINE 



,CRLL 



09 ^8 



PAGE it3 



SEQ 00H3 



CNUOCT 



,CflLL 



CNVTO 



IS 



3S 



MOV 


NUnBER.R2 




;nOVE NUMBER TO R2 


1 CD 


PC/ LNWOCT 






novo 


5r» TYrrLu 




/ St 1 UU NU 1 ITrt ruH'j 


BR 


CNVTO 






. SBTTL 


OCTRL 


TO nsc 1 1 


& TYPE ROUTINE 


INE TO 


CONVERT OCTAL 


NUMBER TO 


flSCII AND TYPE IT OUT 


M All 

nov 


klllMBCD D7 

NUnBcK< kZ 




• Dl IT M 1 U 07 

/ rU 1 1 N KZ 


ICO 


rC» TYrOCT 




' rot 1 D m IT 1 kic 
/ LHLL KOUl 1 Nl 




vtlTrrLu 




CCT TVDC n OR 

/ at 1 1 Trt r LHU 


ico 


or CQwc 




cQwr DrnicTCoc mj tut CTorv 


HAW 

nuu 


Mnn 1 fi 1 TC Du 




■CCT PTD Tn miTPilT 
/del riK lU uuirui 


CLR 


R3 




;R3 UILL CONTAIN OCTAL DIGIT 


nov 


R2,R1 




/GET « TO BE TYPED 


□ CI 


D7 

Kit 




/ sn 1 r 1 W 


Dm 
KUL 


D 7 






nuu 


Bi^ on 

hD> KU 




/ 1 U 1 U 1 1 L UUn ICR 


DD 










R2 




-^MIPT S 1 PI QfF^ 1 TFT 
/ an 1 r 1 ft J run^co llt i 


Dm 


R3 






UtL 


Rl 






our 


21 






nuu 


»3,R1 




/ dL 1 an 1 r 1 ^vjun i en 


nu vD 


DIGTnB(R3). (RH)* 


/ nuVk piw%> 1 1 1 V i u UU 1 ■ u ■ 


CLR 


R3 






DEC 


RO 




; DECREMENT DIGIT COUNT 


BNE 


2S 




, Ub 1 lib A 1 i# 1 u 1 1 


TSTB 


aiTYPFLG 




; BRANCH 1 F flSC II IS 


BNE 


HS 




.NOT TO CE TYPED 


TYPE.ODIGITS 






JSR 


PC, RESTORE 




/RESTORE REGISTERS FROM THE 


RTS 


PC 







/SUBROUTINE TO CONVERT OCTRL DATA TO DECIMAL ASCII 
/CALL MOV NUMBER/ R2 -MOVE NUMBER TO R2 

JSR PC/CNVDEC 

CN^'DEC MOVB SP/MTYPFLG /SET DO NOT TYPE FLAG 

BR CNVTD 

.SBTTL OCTRL TO DECIMAL I TYPE ROUTINE 

/THIS ROUTINE CONVERTS AN OCTAL « TO DECIMAL ASCII AND TYPES IT OUT 
/CALL MOV NUMBER/ R2 ;PUT « IN R2 

JSR PC/TYPOEC /CALL ROUTINE 



TYPDEC CLRB 
CNVTD 

JSR 
CLR 
MOV 

14 CLR 



diTYPFLG 

PC/. SAVE 
RO 

tODlGITS/RH 
R3 



/SET TYPE FLAG 



ON THE STACK 
DECIMAL CONSTANT 



/SAVE REGISTERS 
,R0 IS INDEX TO 
/SET OUTPUT PTR 
,R3 CONTAINS DECIMAL DIGIT 



F H 

D2TUG-B Tn02/TElb DRIUE FUNCTION TIMER HflCYll 30(10Hb) 02-0EC-77 09 48 PRGE 44 
C2TU6C PU 02-0EC-77 09 OCTPL TO OECItlflL I TYPE ROUTINE 



SEQ OOHH 



1704 


0027b2 


lbb002 


003042 


1705 


0027bb 


A A ^ft • A 

103402 




170b 


002770 


005203 




1707 


002772 


000773 




1708 


002774 


06b002 


003042 


1709 


003000 


1 lb324 


001136 


1710 


003004 


f\f A*vnn 

0b2700 


Annnn/% 

000002 


171 1 


003010 


005750 


nn ^ nil >i 

003042 


1712 


003014 


001 3bl 




1713 


00301b 


1 12724 


OOOObO 


17m 


003022 


105737 


001132 


171S 


00302b 


001002 




171fa 


003030 


nnnnnii 

00C0Q4 


nn 4 4 c o 

□01 15U 


1717 


003034 






1718 


^ift 

003034 


004 767 


4 7 li li 

1 77644 


1719 


003040 


nnn ^n ^ 

0002D7 




I 'ZO 
1 7Z1 


003042 


no 7ii on 




1 722 




nn 1 7cn 




1 723 


on 7nii t 


nnn i iiu 




1 724 


OOJUbU 


nnnni o 
UUUUi Z 




1 723 




nnnnn i 




1 7Zb 


nn7nciA 
UuJUbH 


nnnnnn 




\72f 








1 f LO 








4 ly^Q 

1727 








4 7 7n 

1 r JO 








4 7 71 

1 f6l 








4 T 7'> 

1732 








1733 








1734 








1736 








173b 








1737 








1738 








1739 


0G309b 


n 4 ri o 1 1 ^ 

01U24b 




17H0 


OOJOoQ 


n 4 n 7ift 

ai034b 




1741 


nn ^ 

00306Z 


0Ub3QZ 




1 742 


nn ^n^ ■■ 


7n^ 
OOoJOZ 




1 743 


nn ^n/ ^ 

0030b6 


n 4 n^n 7 
010203 




1 744 


nn ^n^n 

003070 


000004 




1745 


nn ^n^ift 

00^074 


n4 £. 7n^ 
016302 


001422 


174b 


nn7 4 nn 

003100 


nnift ^ 

004 7b7 


4 77£. 7^ 


1 747 


nn ^ 4 ma 

0031 OH 


000004 


4 lA 4 4 

00141 1 


4 ^la A 

17"l8 


nn^A 4 n 

003110 


D1630Z 


nA4 lA^U 

001 4Z4 


l7M9 


0031 i1 


004 7o 7 


1 77t'>'7 


1750 


nA7 4 on 
0031 ZO 


0000U4 


UU 1 4 1 b 


4 4 

1751 


nn7 4 Oil 
003124 


000004 


n 4 C 77C 


1 752 


nf\ 7 4 7n 
003130 


01 J^U2 


UUiUib 


1753 


flA7 4 7b 


nmA7£.7 


1 f fOU£ 




UUjiiu 


nnnnnii 


nni II nn 


1766 


OOJIMM 


012603 




1766 


003146 


012602 




1757 


003160 


00C207 




1768 








1769 









2S 



3% 



SUB DC0NST(R0).R2 

8L0 3f 

INC R3 

BR 2t 

nOD DC0NST(R0).R2 

nOVB DIGTflB(R3), (R4)4 

POD «2,R0 

TST DCONST(RO) 

BNE It 

nOVB •*0. (R4)* 

TSTB aiTYPFLG 

BNE 4S 

TYPE.ODIGITS 



.SUBTRACT DECmPL CONSTANT UNTIL 
, INPUT I GOES NEGPTIVE 
.-KEEPING TRPCK OF SUBTRPCTIONS 

.ROD BACK CONSTPNT UHEN NEGPTIVE 

;nOVE ASCII EQUIVILENT 

;NEXT CONSTPNT 

; UNTIL ALL CONSTANTS DONE 



;last digit is 0 
.branch if ascii 

;NOT TO BE TYPED 



IS 



4S 



DCONSr 



JSR 


PC. RESTORE 


RTS 


PC 


UORD 


10000 


. UORD 


1000 


UORD 


100 


UORO 


10 


UORD 


1 


UORD 


0 



; RESTORE REGISTERS FROM THE STACK 



; TERMINATOR 

SBTTL TYPE SPECIFIED TIMES ROUTINE 

THIS SUBROUTINE OUTPUTS THE TIME SPECIFICATIONS FOP THE TEST 
AND ALSO THE ACTUAL riflE RECORDED (ATIME) 
FORMAT OF LIME TYPED 

ACTIJAL=CCCCCC 
IS MAXIMUM TIME FOR TEST (ST IMTBL (TSTNUMX4 ) ) 

IS niNtnun time for test (Stimtbl(tstnumx4-^2)) 

IS ACTUAL TIME RECORDED BY TEST (ATIME) 
LOAD TEST NUMBER 

;MOVE TIME TO ATIME 



RANGES <AAAAAA 
UHERE. 



CALL 



■BBBBBB> 
AAAAAA 
BBBBBB 

CCCCCC 

TEST NUMBER. R 2 
ITIME.dtATIME 
PC.OUTSPC 
R2. -(SP) 
R3. -(SP) 
R2 
R2 

R2.R3 
RNG 

STIMTBL(P3),P2 



MOVB 
MOV 

JSR 

OUTSPC MOV 
MOV 
ASL 
ASL 
MOV 
TYPE.L 
MOV 

JSR PC.TYPDEC 
TYPE, DASH 

MOV STIMTBL*2(R3),R2 

JSR PC.TYPDEC 

TYPE.ANGTRB 

TYPE.L. ACT 

MOV dfATIME.R2 

JSR PC.TYPDEC 

TYPE.CRLF 

MOV (SP)*.R3 

MOV (SP)*.R2 

RTS PC 



.SAVE R2 & R3 ON THE STACK 

MULTIPLY TEST • TIMES 4 
,T0 FORM INDEX INTO ST IMTBL 
.R3 CONTAINS INDEX INTO TABLE 

, GET MAXIMUM SPEC TIME 
-CONVERT TO DECIMAL & TYPE 

.GET MINIMUM TIME 
.CONVERT TO DECIMAL & TYPE 



•GET ACTUAL 
.CONl^ERT TO 



.RETURN 



TIME 
DECIMAL 



I TYPE 



SBT^L 



TYPE GAP TIMES SUBROUTINE 



D2TUG-B Tn02/TElb DRIVE 
CZTUGC PU 02-0EC-77 



1760 
17fel 
1762 
1763 
l76^ 
1765 
1766 
1767 
1768 
1769 
1770 
1771 
1^72 
1773 
r7i» 
17"S 
r?6 
17^7 
1778 
1779 
1780 
1781 
1782 
1783 
1784 
1785 
1786 
1787 
1788 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
1796 
1797 
1798 
1^99 
1800 
1801 
1802 
1803 
180>« 
1805 
1806 
1807 
1808 
1809 
1810 
1811 
1S12 
1813 
18m 
1815 



FUNCTION 
09 H6 



TIMER nflCYll 



3C(1046) 
TYPE GAP 



G H 

02-DEC-77 09. H8 
TIHES SUBROUTINE 



PAGE H5 



SEQ 0045 



003152 


010246 




003154 


010346 




003156 


116703 


176742 


003162 


006303 




00316H 


006303 




003166 


00C004 


015365 


003172 


016302 


001576 


003176 


004767 


177540 


003202 


on nnm I 

000004 


nn 4 ii 4 4 

00141 1 


003206 


016302 


001600 


003212 


004767 


177524 


003216 


□□0004 


nn 4 ii 4 £. 

001416 


003222 


000004 


015375 


003226 


013702 


001016 


003232 


□QH7b7 


1 77bOH 


003236 


000004 


n 4 ^ nc ii 


0032*42 


1 1 370Z 


nn 4 4 Oil 


003ZH6 


□uH7b7 


1 < '^ibZ 


OOiZbZ 


nnnnnu 


nn 1 li nn 
UU 1 *♦ UU 


003256 


n 4 n 7 

OiZbUJ 




003260 






003262 


00020/ 




003264 






003264 


□D4767 


I ( < L(Z 


nn ^ o ^ n 

003270 


n 4 o'^no 

012700 


001 Z70 


00327H 


012701 


nna 4 

001 1 


nn ^nn 

003300 


nnF n 4 4 

00501 1 




nn ^ ^n ^ 

003302 


nnr n^ 4 

005061 


000002 


003306 


122710 


000015 


00331Z 


U014 iH 




003314 


112002 




003316 


0M27a2 


177770 


003322 


012703 


000003 


003326 


006311 




003330 


006161 


oonooz 


003334 


005303 




003336 


001373 




0033H0 


050211 




003342 


000761 




003344 






003344 


00H7b7 


177:34 


003350 


000207 





THIS SUBROUTINE IS USED TO TYPE THE SPECIFIED GAP SIZES (RECORDED IN 
TST021) IT IS CPLLED BY THE CnPOK ROUTINE IF THE GfiP SIZE IS OUT OF 
RANGE VIP THE HLT ROUTINE (HLT42) 



/ CPLL 


novB 


•GRP/ GRP 


1 /snn ^nn m i ^iTn ^ns 

/LOAD GRP ff INTO uRP 




now 


ITinE.RTinE 


■ Ann n^ ini v i i Livn nv i 

/LOAD ACTUAL TinE INTO ATinE 




JSR 


PC/ 0UT6RP 




OUTGRP 


nou 


R2, -(SP) 


^n\#p It's nun b 7 

/ SRWt R2 HND K J 




nou 


R3, -(SP) 






I10UB 


GRP.R3 


/ GE T GAP 11 




fiSL 


R3 






RSL 


R3 






TYPE.L. 


RNG 






now 


GTinTBL(R3),R2 


' T MAV T 1 Mr 

/ Gt T rlHA T 1 He 




JSR 


PC.TYPDEC 


/LOnVtKi lU UtLlnHL » ITrb 




TYPE.DPSH 






nou 


GTinTBL+2(R3).R2 


Itf T M 1 ki T 1 Mr 

/ ut 1 n 1 N 1 1 nt 




JSR 


PCTYPDEC 


/LUnVtKI lU UtLlnHL & 1 Trt 




TYPE.RNGTRB 


/ 1 Yrt V 




TYPE A. 


ACT 






nov 


dlRTinE,R2 


/GET ACTUAL TIME 




JSR 


PC.TYPOEC 


; CONWERT TO DEC 1 HAL & TYPE 




TYPE.E. 


GRP 






nouB 


dlGRP,R2 


' ut. I UHr II 




JSR 


PCTYPOCT 


, 1 lit UMr w 




TYPE.CRLF 






MOU 


(SP)*,R3 


DCCTHDC D7 QMn P9 




MOV 


(SP)+.R2 






RTS 


PC 






. SBTTL 


ASCII TO 


n^TQl muWCDT CIIBO/^IITlMr 
ULIHL LUnULK 1 dUDKUUIlnt. 


-SUBROUTINE TO 


CONWERT ASCII DATA 


Iv '.'L 1 HL LvNwtlCltL' UL 1 ML UM!rl 


, IS LEFT IN OCTRLO <15-00> 




CNVTflO 










JSR 


PC. SRWE 


' 3Hvt Kt.ulolC.Ko Un Int. dlnLK 




now 


tlNBUF,RO 


• CCT DTD Trt DCr 1 1 rtOTQ 

/ at 1 r 1 K 1 U HoL 1 1 UH 1 H 




now 


lOCTRLO.Rt 


ncT onnprcc rtc rtrxQi noTa 

/ ut 1 HUUKCod Ur UL 1 HL UHIH 




CLR 


(Rt) 


/ LLbMK UU 1 ULU ULIML Un 1 H 




CLR 


2(R1» 




IS 


cnpB 


ICR, (RO) 


/^D^ TrDMIhiOTC'C IMPIIT 




BEQ 


IS 






nowB 


(RC)+.R2 


,GET -OCTAL" DATA 




BIC 


»177770.R2 


.STRIP UNUSED BITS 




now 


i3.R3 


CCT CUlTT milUT 


25 


RSL 


(Rl) 


.SHIFT LAST 


ROL 


2(R1) 


.OCTAL DIGIT 




DEC 


R3 






BNE 


IS 






BIS 


R2. (Rl) 


AND INSERT THIS DIGIT 




BR 


\S 


.GO GET NEXT DIGIT 


1% 


JSR 


PC, RESTORE 


/RESTORE REGISTERS FROn THE STACK 




RTS 


PC 


.RETURN 



SBTTL PUBLISH SUBROUTINE 

THE PUBLISH SUBROUTINE RWERRGES THE RECORDED TIHES FOP EACH TEST iT- 



H H 

DZTUG-B TMOZ/TElb OR'VE FUNCTION TIMER MflCYll 30(10Hb) 02-0EC-77 09 PRGE SEQ 00H6 

C2TUGC Pll 02-0EC-77 09 H6 PUBLISH SUBROUTINE 



181b 








.ERflTlON (IF lb. ITERRTIONS) RNO PLACES 


THE RVERRGE RESULT IN 'RTIME' 




\zr 








, IT TYPES THE NRFIE OF THE FUNCT'ON THPT 


UPS TIMED. THE TIME SPEC- 




1818 
1819 








, IFICPTION PNO 


THE PCTUPL TIHE 








1820 


003352 






Dl IQI 1 CU 












1821 


003352 


OOM 7b7 


17720^ 




ICD 


PC SAVE 




.SRVE REGISTERS ON THE STRCK 




1822 


00335b 


012700 


001020 




nuw 


•RTIMTBL.RO 


.GET TP8LE ROORESS CONTRINING TIMES 




1823 


0033b2 


113701 


001125 




MnwQ 
nuuD 


ailTCNT,Rl 


.GET ff 


OF ENTRIES (GIVEN BY ITERRTION 


COUNT) 


182^ 


0033bb 


122701 


000001 




CnPB 


»l.Rt 




.BRRNCH IF SINGLE ITERRTION 




182B 


003372 


00m23 








m 








182b 


00337H 


005002 






ri D 


R2 




.CLEPR 'SUM' REGISTERS 




1827 


00337b 


006003 








R3 








1823 


003^00 


122701 


000020 




rnPR 

^1 Ir D 


«lb .Rl 




,BRPNCH IF lb ITERPTIONS 




18Z9 


003'«0M 


oomo2 








1% 








1830 


003^0b 


000000 






HQI T 






. ITERRTION COUNT MUST BE 1 OR 


lb 


1831 


oo3mo 


000777 












.DO NOT CHPNGE POSIT OF SUll 




1832 
















.UHEN TEST IS RUNNING. 




1833 




















183M 


003m 2 


0b2002 








(R0)*/R2 




.SUM INDIVIOUPL TIMES 




183S 


003>*m 


005503 






ROC 


R3 








183b 


003m b 


005301 






DEC 


Rl 








1837 


003^20 


001 37H 






BNE 


It 








1838 




















1839 


003422 


012700 


OOOnOM 




MOV 


m RO 








1840 


003M26 


006203 




35 


PSR 


R3 




.SHIFT TIME IN R3 & R2 M PLRCES 


18m 


003M30 


006002 






ROR 


R2 




.RIGHT = DIVIDE BY lb 




18it2 


003M32 


005300 






DEC 


RO 








18M3 


0D3^3^ 


001 37M 






BNE 


3S 








18HM 


003^3b 


010237 


00101b 




MOV 


R2.dtPTtME 




.MOVE PVERRGEO TIMES 




18>4S 




















18Hb 


003MM2 


113700 


0011 2b 


U5 


MOVB 


diTSTNUn,RO 




.GET TEST « 




18M7 


003MMb 


006300 






flSL 


RO 








18M8 


003M50 


01b0b7 


OOlb'^b 000002 




MOV 


NPnPTR(R0).6S 




■GET TEST NRME STRING PDDRESS 




18«*9 


003^5b 


OOOOOH 






TYPE 










1850 


003^b0 


000000 




5S 


UORD 


0 








1851 


003Hb2 


113702 


oon2b 




MOVB 


aiTSTNUM,R2 




.GET TEST « 




18S2 


003Mbb 


00^ 7b7 


17736H 




JSR 


PC.OUTSPC 




.OUTPUT TIMES 




18B3 


003'*72 


00M7b7 


177106 




JSR 


PC. RESTORE 




.RESTORE REGISTERS FROM THE STRCK 


\SS^ 


0034^6 


000207 






RTS 


PC 








13S5 




















l8Bb 










SBTTL 


INPUT 


SUBROUTINE 




1857 








.SUBROUTINE TO 


GET TTY INPUT 








1858 








.CRLL 


JSR 


PC. INPUT 








1859 








INPUT 


DPTP IS 


RETUNEO IN BUFFER BEGINNING RT INBUF 




18b0 




















18bl 


003500 


OlOOHb 




INPUT 


MOV 


RO. -(SP) 


.SAVE RO ON THE STRCK 




18b2 


003502 


012700 


0012^0 


15 


MOV 


S INBUF, RO 








18b3 


00350b 


105737 


1 7^5b0 


25 


TSTB 


d«TKS 








l8bM 


003612 


100375 






BPL 


2S 








18b5 




















I8bb 


0035m 


1 1 37H6 


I776b2 




MOVB 


aiTKB, -(SP) 


.GET CHRRPCTER 




I8b7 


003520 


0H271b 


000200 




BIC 


«200, (SP) 








I8b8 


00352>4 


12271b 


000177 




CMPB 


»177, (SP; 


.CHECK 


RUBOUT 




I8b9 


003530 


001G0^ 






BNE 


35 








1870 


003532 


I2>402b 






CMPB 


-(RO). (SP)+ 


.REMOVE 


CHRRPCTER FROM INPUT 




1871 


00353U 


OOOOOH 


ooii<o: 




TYPEBKSLSH 









DZTUG-B Tn02/TEtb DRIVE FUNCTION TltlER MRCYtl 
C2TUGC Pll 02-DEC-77 09 



1872 


0035^0 


000762 






1873 


0Q35^2 


122716 


000025 


3S 


187H 


0035^6 


001 00^ 






1875 


003550 


005726 






1876 


003552 


00000^ 


oomoo 




1877 


003556 


000751 






1878 


003560 


111637 


oomo5 




1879 


00356^ 


111620 






1880 


003566 


122726 


000015 




1881 


003572 


oomo3 






1882 


00357^ 


00000^ 


ocmo5 




1883 


003600 


0007^2 






188H 


003602 


OOGOO'* 


oomoo 


5S 


1SS5 


003606 


012600 






iSSb 


003610 


000207 






iSS7 










18S8 








,K 


:889 


003612 


ll37^6 


177562 


TK 


1890 


003616 


0^2716 


000200 




1891 


003622 


122716 


000C17 




1892 


003626 


C01003 






1893 


003630 


112667 


176H76 




189H 


003fe3^ 


000002 






1895 










1896 


003636 


122726 


n00003 


IS 


1897 


0036^2 


001003 






1898 


0036H^ 


000005 






1899 


0036H6 


000137 


005^30 




1900 


003652 


000002 







I H 

30(10H6) 02-DEC-77 09 48 PRGE 47 
INPUT SUBROUTINE 



SEQ 004 7 



BR 2i 

CnPB HCNTRLU, (SP) 

BNE 4t 

TST (SP)* 
TYPE.CRLF 



,URIT FOR NEXT CHfiRflCTER 
.CHECK CONTROL U ( U) 



BR 

nouB 
nouB 
cnPB 

BEQ 



It 

(SP),aiECHO 
(SP), (R0)+ 
«CR/ (SP)* 
51 



TYPE. ECHO 

BR 2t 

TYPE.CRLF 

nOU (SP)*.R0 

RTS PC 



RRD INTERRUPT SERVICE ROUTINE 



novB 

BIC 

CnPB 

BNE 

nouB 

RTI 



aiTKB, -(SP) 
1200. (SP) 
•CNTRLO. (SP) 
IS 

(SP)*.4CNTRL0 



.GET TYPED CHPRPCTER 
.STRIP PARITY BIT 
.BRANCH IF NOT CONTROL 0 



( 0) 



.SET CONTROL 0 INDICPTOP IN TYPE ROUTINE 
;EXIT 



CURB 
BNE 
RESET 
J HP 

RTI 



13. 'SP) + 
2i 

dllNiT 



.BRANCH IF NOT CONTROL C ( C) 



.RESTART PROGRAM 
.EXIT 



J 4 

D2TUG-B TH02/TElb ORIUE FUNCTION TinER nflCYll 30(10^b) 02-0EC-77 09 ^8 PfiGE 48 
CZTUGf Pll 02-DEC-77 09 ^b ERROR SERVICE ROUTINES 



SEQ 0048 



1901 

1902 
1903 
1904 
1905 
1906 
1907 
1908 
1909 
1910 
1911 
1912 
1913 
1914 
1915 
1916 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 
1926 
1927 
1928 
1929 
1930 
1931 
1932 
1933 
1934 
1936 
1936 
1937 
1938 
1939 
1940 
19U1 
1942 
1943 
I94f 
1946 
1946 
1947 
1948 
1949 
1960 
1961 
1952 
1963 
1964 
1955 
1956 



003654 000000 



003656 


004767 


176112 




HLT 


JSR 


PCCKSUR 


003662 


004767 


1 76674 






JSR 


PC, . SAVE 


003666 


110637 


001127 




IS 


nouB 


SP.atERFLG 


003672 


032777 


020000 


175100 




BIT 


«SUl3,aSUR 


003700 


001075 








BNE 


4i 


003702 


000004 


014655 






TYPE,E 


HDR 


003706 


113702 


001126 






novB 


dtTSTNUn,R2 


003712 


004767 


176716 






JSR 


PCTYPOCT 


003716 


016600 


000016 






now 


16(SP),R0 


003722 


162700 


000002 






SUB 


12. RO 


003726 


111000 








novB 


(RO).RO 


003730 


001417 








BEQ 


2% 


003732 


000004 


014740 






TYPE.E 


HDR 2 


003736 


1 22700 


000002 






ChPB 


12, RO 


003742 


001006 








BNE 


lOt 


003744 


004767 


177202 






JSR 


PCOUTGflP 




nnnnnu 


001400 






TYPE.CRLF 


003754 


000447 








BR 


4« 


003756 


004767 


1 77074 




lOS 


JSR 


PCOUTSPC 


003762 


000004 


001400 






TYPE.CRLF 


003766 


000442 








BR 


4S 


003770 


016600 


000014 




2S 


hOV 


ER(R5),R0 


003774 


032766 


002000 


000032 




BIT 


IPE1600,TC(R5) 


004002 


001403 








BEQ 


20f 


004004 


042700 


102100 






BIC 


1102100, RO 


004010 


000402 








BR 


Z\% 


004012 


042700 


102300 




20$ 


BIC 


11 02300.ro 


004016 


005700 






21S 


TST 


RO 


nnun^n 










BNE 


22§ 


004022 


000004 


Q14631 






TYPE.E 


SFT 


004026 


000434 








BR 


6f 


004030 


000004 


014665 




22S 


TYPE.E 


HDRl 


004034 


010600 








nov 


R5,R0 


004036 


012701 


000007 






tiov 


17. ,R1 


004042 


012002 






35 


nov 


(R0)+.R2 


004044 


004767 


1 76664 






JSR 


PCTYPOCT 


004050 


000004 


001413 






rYPE,SPflCc2 


004054 


005301 








DEC 


Rl 


004 056 


001371 








BNE 


31 


004060 


016502 


000032 






nov 


TC(R5),R2 


004064 


004767 


176644 






JSR 


PCTYPOCT 


004070 


000004 


001400 






TYPE.CRLF 


004074 


032777 


001000 


17i»67to 


4« 


BIT 


IISU09,aSUR 


004102 


C01402 








BEQ 


5% 


004 lOu 


000004 


001407 






TYPE. BELL 



SBTTL ERROR SERVICE ROUTINES 

, ROUTINE TO PROCESS ERROR TRRPS (TRAPS TO 4) 
ERRTRP: HALT 

, ERROR SERVICE ROUTINE 

,THIS ROUTINE PROCESSES TUO TYPES OF ERRORS (OUT OF RANGE AND HARDUARE) 
;THE CALLS FOR AN OUT OF RANGE ERROR ARE <HLT4l>, <HLT^2> AND, FOR A 
, HARDUARE ERROR THE CALL IS <HLT> . 

, CHECK FOR CNTL G 
,SAVE REGISTERS ON THE STACK 
,SET ERROR FLAG 
, BRANCH IF NO TYPOUT 



,GET TEST « 
,AND TYPE IT 
, GET RETURN PC 
;NOU PC OF HLT CALL 
;NOU HLT CALL ITSELF 
; BRANCH IF HLT 

, BRANCH IF NOT HLT+2 

,TYPE GAP SPECIFIED TIMES 

.TYPE SPECIFIED TlflES 



,TYPE SOFT EPROP MESSAGE 



,GET FIKST ADDRESS OF REGS 

TYPE FIRST 7 REGS 
,GET PEG CONTENTS 
,AND TYPE IT 



,GET CONTENTS OF TC PEGISTER 



.BRANCH IF NO RING THE BELL 



D2TUG-B Tn02/TElfe DRIVE FUNCTION TIMER ttfiCYU 30(10»»b) 02-DEC-77 09 »48 
CZTUGC PH 02-DEC-77 09 ERROR SERVICE ROUTINES 



PRGE H9 



1957 OOmiO 005777 17»»66»» 



1958 
1959 
19fe0 
1961 
1962 
1963 
196'4 



oomm 
oomi6 
oomzo 

0GU12it 

oom3u 



100001 
000000 
00»4767 
00»t7b7 
000002 



175650 
176>(5>t 



St 
6S 



TST 

BPL 

HALT 

JSR 

JSR 

RTI 



dSUR 
6f 

PCCKSUR 
PC, RESTORE 



^HRLT ON ERROR 



, CHECK FOR CNTL G 

; RESTORE REGISTERS FROM THE STACK 
, RETURN 



L ^ 

DZTUG-B Tn02/T£l6 DRIVE FUNCTION TIMER MRCYll 30(10^6) 02-DEC-77 09 H8 PAGE SO SEQ 0060 



C2TUGC Pll 02-DEC-77 09 H 6 SCOPE SUBROUTINE 

1965 .SBTTL SCOPE SUBROUTINE 

1966 .SCOPE ROUTINE 

1967 ,THIS ROUTINE IS ENTERED UPON COMPLETION OF EfiCH SUBTEST 

1968 ,THE SCOPE ROUTINE: 

1969 , OUTPUTS TIME SPEC ON EACH ITERATION IF SU08 IS SET 

1970 , REPEATS TEST IF SHIH IS SET 

1971 STORES ACTUAL TIME FOR FUNCTION IN TIME TABLE (ATIMTBD 

1972 PUBLISHES TIME IF SU10«0 

1973 . UPDATES ITERATION COUNT AND IF ITERATIONS COMPLETE CONTINUES 
197H , TO NEXT TEST, OTHERWISE REPEATS TEST. 

1975 DELAYS BEFORE CONTINUING OR REPEATING TEST 

1976 , INITIALIZES DRIVE 

1977 .RETURNS RS^BASE ADDRESS OF TM02 REGISTERS (ADDRESS OF CSl ) 

1978 , Rls'DS' REG ADDRESS 

1979 , ROs'FC REG ADDRESS 

1980 



1981 


oom32 


00H767 


175636 




SCOPE 


JSR 


PCCKSUR 


/-CHECK FOR CNTL G 


1982 


oom36 


013705 


oolom 






MOV 


dlTMBASE.RS 


;SET RS TO FIRST TM REG 


1983 


00Hm2 


032777 


OOOHOO 


17Hb30 




BIT 


iSUOB, dSUR 


/BRANCH IF SPECIFICATION LINE 


198H 


oom60 


oomoH 








BEQ 


lOS 


;NOT DESIRED ON EACH ITERATION 


1986 


00m62 


113702 


001126 






MOVB 


atTSTNUM.R2 


;GET TEST NUMBER 


1986 


oom66 


00"4767 


17667H 






JSR 


PCOUTSPC 


; OUTPUT TIME RECORDED 


1987 


oom62 


032777 


01,0000 


l7^fclO 


IDS 


BIT 


ISUm.dSUR 


.BRANCH IF CONTINUOS LOOP 


1988 


oom70 


oomi7 








BEO 


2S 


,HOT DESIRED 


1989 


oom72 


00H767 


0005M6 




IS 


JSR 


PC, DELAY 


/DELAY 360 MS 


1990 


00m76 


00H767 


000776 






JSR 


PCRHINIT 


; INIT 


1991 


00^202 


106037 


001127 






CLRB 


dlERFLG 


; CLEAR ERROR FLAG 


1992 


00H206 


016716 


17^57^ 






MOV 


SCPADR, (SP) 




1993 


C0H212 


010601 








MOV 


R6,R1 




199«4 


00H2m 


062701 


000012 






ADO 


XDS.Rl 


; ADDRESS OF 'DS' REG IS IN Rl 


1996 


00H220 


01 0600 








MOV 


R6,R0 




1996 


00H222 


062700 


000006 






ADD 


8FC,R0 


; ADDRESS OF 'FC REG IS IN RO 


1997 


00H226 


000002 








RTI 






1998 


















1999 


00H230 


106737 


001127 




2S 


TSTB 


dlERFLG 


.BRANCH IF ERROR FLAG IS SET 


2000 


00H23H 


001006 








BNE 


3S 




2001 


00H236 


113700 


001125 






MOVB 


atlTCNT.RO 


/GET ITERATION COUNT 


2002 


00H2H2 


006300 








ASL 


RO 


; STORE TIME IN TABLE 


2003 


00H2it>t 


013760 


001016 


001020 




MOV 


atATinE,ATIMTBL(RO) 




200^ 


00H262 


I05?'w' 


GDI 126 




3S 


INCB 


ailTCNT 


.-INCREMENT ITERATION COUNT 


2006 


00H266 


03277? 


OOHOOO 


l7M5m 




BIT 


isuti,asuR 


.BRANCH IF SINGLE ITERATION DESIRED 


2006 


00H26H 


OOlOOH 








BNE 


MS 




2007 


00H266 


122737 


000020 


001126 




CMPB 


116. .ailTCNT 


/BRANCH IF ITERATIONS INCOMPLETE 


2008 


00M27H 


001336 








BNE 


IS 




2009 


00H276 


011637 


001006 




MS- 


MOV 


(SP).dfSCPADR 


/SET SCOPE ADDRESS TO NEXT TEST 


2010 


00H302 


032777 


002000 


l7^^70 




BIT 


ISUlO.aSUR 


/BRANCH IF NO PUBLICATION DESIRED 


2011 


00H310 


001002 








BNE 


Si 


;G0 PUBLISH TEST DATA 


2012 


00H312 


00H767 


1770314 






JSR 


PC, PUBLISH 


2013 


00H316 


106037 


001125 




5S 


CLRB 


dllTCNT 


.-RESET ITERATION COUNT 


20m 


00*4322 


106777 


17HH52 






TSTB 


asuR 


; BRANCH IF USER DOES NOT UANT TO 


2016 


00H326 


001721 








BEQ 


IS 


.HALT ON A SELECTED TEST 


2016 


00H330 


0177H6 


l7^^^^ 






MOV 


aSHR,-(SP) 


;GET SWITCHES 


2017 


OOH 33M 


0H2716 


1777H0 






BIC 


I1777H0, (SP) 


.CLEAR ALL BUT TEST 9 


2018 


OOH3H0 


006316 








DEC 


(SP) 


.FORM TEST « -1 


2019 


oo^3^2 


123726 


001126 






CMPB 


ilTSTNUH, (SP)+ 


/BRANCH IF NOT AT TEST 


2020 


00H3H6 


001311 








BNE 


IS 
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2021 

2022 

2023 

202>( 

202S 

202b 

2027 

20Z8 

2029 

2030 

2031 

2032 

2033 

ZOZH 

2035 

203b 

2037 

2038 

2039 

20H0 

20m 

20>t2 

20H3 

20HH 

20H5 

20H6 

20H7 

20H8 

20H9 

2060 

20S1 

2062 

2063 

206H 

2056 

206b 

2057 

2068 

2059 

2060 

20b 1 

20b 2 

20b3 

ZQbH 

20b6 

2066 

2067 

2068 

2069 

2070 

2071 

2072 

2073 

207H 

2075 

2076 



00^350 000000 
00M352 00H7b7 
00<435b 000 ''05 



00H360 
00H3b2 
OOH 3bb 
00H37H 
OOH 37b 
OOHHOH 
OOMHOb 

OOHIIO 
GGHm2 
00UH20 

oo^^22 



oo^^2^ 

00HH32 
00HH3I* 



00MH50 
00MM52 
00MM6M 
0GHH&6 
G0HH60 
OOHHbH 
00HH66 



GGHH7M 
GGH6G2 
GGH5GH 



00500H 
012703 
032765 

oomo5 

0327b5 
001 37^ 
COO>405 

005^03 
0327b5 
001 77^ 
000207 



0:27b5 

oomob 

000112 

00UM50 
005H03 
00520H 
lOOMOl 
000112 
GGOOOH 
lOMHOO 
000177 

0327b5 
001362 
000112 



175m6 



000100 00002H 



000100 00002H 



01>47bb 
17M3m 

000 1 00 00002>4 



f1 

nflCYll 30(10Hb) 02-DEC-77 
SCOPE SUBROUTINE 



14 

09 



PAGE 51 



SEQ 0051 



HRLT 

JSR 

BR 



PCCKSUR 
It 



.CHECK FOR CNTL G 



SBTTL TItlER SUBROUTINES 



00002^ 
000100 OOCOZH 

000100 00002^ IS 



, SUBROUTINE TO SYNCHRONIZE THE TIMER AND TURN IT ON. 
, REGISTER ^ IS CLERRED, RNO THE OSCILLATOR POLARITY 
,THE ROUTINE IS EXITED UHEN THE OSCILLATOR POLARITY 
;SET TO INDICATE THE POLARITY OF THE OSCILLATOR. 
,CALL JSR PCTinON 

, RETURNS R3 SET TO INDICATE LAST POLARITY (+2^/-2^ 

; RH s 0 

TinON 



IS nONITOREO 
CHANGES UITH 



■'Q/\) 



R3 



CLR 


RH 


/-CLEAR TmE COUNT 


nov 


»2>t.R3 


;SET POLARITY TO '0' STATE 


BIT 


HOSC/flRCRS) 


; BRANCH IF POLARITY IS '0' 


BEQ 


2t 




BIT 


iOSC,nR(R5) 


;UAIT FOR OSCILLATOR TO RETURN 


BNE 


If 




BR 


^s 




NEG 


R3 


; NEGATE PREV POLARITY INDICATOR 


BIT 


iOSC.f1R(R5) 


;UAIT FOR OSCILLATOR TO RETURN 


BEQ 


3S 


,T0 T STATE 


RTS 


PC 





2S 
35 

.SUBROUTINE TO COUNT TItlE 

.EACH TIME THE OSCILLATOR TOGGLES (BIT <0b> IN flR REG) REGISTER 
.RH IS INCREIIENTED/ AND THE REGISTER R3 IS NEGATED TO INDICATE 
,THE LAST STATE OF THE OSCILLATOR. 

.CALL jnP TineR(R3) ,R3 IS SET BY TIHON ROUTINE 

R2=RETURN ADDRESS TO CALLER 
.NOTE THE TltlE TO EXECUTE THIS ROUTINE IS VERY CRITICAL IT nUST BE 
.LESS THAN HO US. 



.ENTER 
TiriERl: 



TIMER 



TinERR 



.ENTER 
TinERO 



HERE VIA JtlP Tit1ER(R3) 

BIT •0SC.nR(R6) 

BEQ TIMER 

JMP (R2) 

sTIMERUZU 



UHEN R3=-2H (PREV STATE=1) 

.BRANCH IF CURRENT STATE IS 
.GO INCREMENT TIME 
; RETURN TO TEST 



•0* 



NEG 
INC 
6MI 
JMP 

TYPE.E 

HLT 

JMP 



R3 
RM 

TIMERR 
(R2) 
TIMOV 

dSCPADR 



. =TmER+2H 
HERE VIA JMP TmER(R3) 
BIT tOSC.MR(R5) 
BNE TIMER 
JMP (R2) 



NEGATE PREV STATE INDICATOR 
INCREMENT 'TICK' COUNT 
BRANCH ON OVERFLOU 
RETURN TO TEST 
TYPE 'TIMER OVERFLOUED' 
REPORT HARDUARE ERROR 
RETURN TO BEGINNING OF TEST 



UHEN R3=+2H (PREV STATE=0) 

; BRANCH IF CURRENT STATE = T 



D2TUG-B Tn02/TE16 DRIVE FUNCTION TIMER 

C2TUGC Pll 02-DEC-77 09 

2077 
2078 
2079 
2080 
2081 
2082 
2083 
208^ 

2086 00HS06 

2086 00^606 00^ 767 176060 

2087 00^612 012700 000070 

2088 00^616 010^01 

2089 00U520 00E002 

2090 00>tB22 006003 

2091 00>462>4 060002 

2092 00^626 006603 

2093 00H630 006301 
209^ 00^4632 001 37H 

2096 00^63^ 0102H6 
2096 

2097 00H63b 0103H6 

2098 00H6H0 012746 000012 

2099 004644 004767 000262 

2100 004650 006726 

2101 004552 012637 001016 

2102 004566 113700 001126 

2103 004662 006300 

2104 004564 006300 

2105 004566 023760 

2106 004574 101004 

2107 004576 023760 

2108 004604 101001 

2109 004606 104401 

2110 004610 

2111 004610 004767 

2112 004614 000207 
2113 
2114 
2115 
2116 
2117 
"2118 
2119 
2120 
2121 
2122 

2123 004616 

2124 004616 004767 176740 

2125 004622 012700 000070 

2126 004626 010401 

2127 004630 005002 

2128 004632 005003 

2129 004634 060002 

2130 004636 005603 

2131 004640 006301 

2132 004642 001374 



nnCYll 30(1046) 02-DEC 
TIMER SUBROUTINES 



N 

■77 



4 

09.48 



PRGE 52 



SEQ 0052 



SUBROUTINE TO CHECK TIME RECORDED BY SUBTEST 

THIS SUBROUTINE COMPUTES THE flCTURL TIME (IN MICROSECONDS) AND CHECKS 
THRT THE TIME RECORDED BY THE SUBTEST IS CORRECT BY COMPRRING THE TIME 
UITH THE HIGH LIMIT (STIMTBL(RO) ) AND THE LOU LIMIT (ST IMTBL-»2(R0) ) 
IF THE TIME IS OUT OF RRNGE RN OUT OF RANGE ERROR TYPEOUT RESULTS 
THE SUBROUTINE IS ENTERED UITH- 



TIMOK. 



IS. 



001016 001422 
001016 001424 

176770 



R4=TICK 


COUNT 




JSR 


PC/ SAVE 


/ SRVE REGISTERS ON THE STRCK 


MOV 


1156 /RQ 


/ utT T 1 Pit PtR T 1 CK 


MOV 


nil B A 

R4> Kl 


/GET TICKS COUNT 


CLR 


RZ 


/CLERK ^UnniNu KtulSTtKS 


CLk 


Ki 


HDO 


on o o 


'Mill TIDI V T 1 MC DTD TtTV 

/nULTIPLY lint PtK 1 ILK 


HUC 


K 3 


/BY 1 i CK COUNT 




D 1 
K 1 






1* 




MAW 




'niuinc miiMT qv in 

/UIVIUL LUUnl DT lU 


MOV 


R3.-(SP) 




MOV 


• 10. ,-(SP) 




ICD 


or miiinr 
rL/ U 1 V lUb 




TCT 


(SP 




MOV ^ 


(SP)*,aiflTIHE 


/STORE QUOTIENT 


MOVBM 


BTSTNUM, RO 


;6ET TEST ff 


flSL^H 






RSL 1 






CMP 


VnTinE.STmTBLCRO) 


; CHECK THRT TIME IS UITHIN 


BHI 


2t 


/LIMITS SPECIFIED 


CMP 


dlRTmE.STlMTBL'i-2(P0) 




BHI 


3S 




HLT+1 




CRLL ERROR ROUTINE 


JSR 


PC . RESTORE 


; RESTORE REGISTERS FROM THE STRCK 


RTS 


PC 


/ RETURN 



2S 
3S 



/SUBROUTINE TO CHECK INDIVIDURL GAP TIMES (PRODUCED BY TST021) 
/SUBROUTINE COMPUTES THE flCTURL TIME (IN MICROSECONDS) AND CHECKS 
/THRT THE GAP TIME RECORDED BY THE SUBTEST (TST021) BY COMPARING THE 
/TIME UlTH THE MAX LIMIT (GTIMT6L-GAPTBL(R1 ) ) AND THE MIN LIMIT 
/ (GTlMTBL+2-GflPTBL(Rl)). 

/CRLL- nOV ITICK C0UHT/R4 / R4 CONTRINS TICK COUNT 

MOVB IGRP/dlGRP /LOCRTION GRP CONTRINS GRP S 

JSR PC/GAPOK 



GRP OK 



IS 



JSR 
MOV 
MOV 
CLR 
CLR 
ROD 
RDC 
DEC 
BNE 



PC/ . SRVE 

166. / RO 

R4/R1 

R2 

R3 

R0/R2 
R3 
Rl 
IS 



SRVE REGISTERS ON THE STRCK 

GET TIME PER TICK 

GET TICK COUNT 

CLERR SUMMING REGISTERS 

MULTIPLY TICK COUNT 
BY TIME PER TICK 
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2133 


















2134 


004644 


010246 








MOV 


R2, -(SP) 


; DIVIDE TIME BY 10 


2135 


004646 


010346 








MOV 


R3. -(SP) 




2136 


004650 


012746 


000012 






MOV 


110 < -(SP) 




2137 


004654 


004767 


000152 






JSR 


PC/blVlDE 




2138 


004660 


005726 








TST 


(SP)^ 


/DISCARD REMAINDER 


2139 


004662 


01^637 


001016 






MOV 


(SP)^/dlflTinE 


; STORE QUOTIENT 


2mo 


004666 


113703 


001124 






MOVB 


aiGRP,R3 


/GET GAP « 


2im 


004672 


006303 








flSL 


R3 


/MULTPLY BY 4 


2142 


004674 


006303 








flSL 


R3 


;T0 GET AT TABLE ENTRY 


2m3 


004676 


023763 


001016 


001576 




CMP 


aiRTinE/GTIMTBL(R3) 


; CHECK TIME (MAX) 


2144 


004704 


101004 








BHI 


25 




2145 


004706 


023763 


001016 


001600 




CMP 


dlATmE/GTIMTBL^2(R3) 


/'CHECK TIME (MIN) 


2146 


004714 


101002 








BHI 


35 




2147 


004716 


104402 






2i 


HLT+2 




/REPORT OUT OF RANGE ERROR 


2148 


004720 


000406 








BR 


1005 




2149 


004722 


032777 


000400 


174050 


3S 


BIT 


ffSU08< dSHR 


/BRANCH IF TIMES NOT UANTEO 


2150 


004730 


001402 








BEQ 


1005 




2151 


004732 


004767 


176214 






JSR 


PC/OUTGAP 


;TYPE GAP TIMES 


2152 


















2153 


004736 








lOOS 








2154 


004736 


004767 


175642 






JSR 


PC, RESTORE 


; RESTORE REGISTERS FROM THE STACK 


2155 


004742 


000207 








RTS 


PC 


/RETURN TO TEST 


2156 


















2157 












SB'TL 


DELAY SUBROUTINES 


2158 










.THIS 


SUBROUTINE CRUSES OELflY OF 360 


MS 


2159 


004744 


004767 


177410 




DELOY 


JSR 


PCTIMON 




2160 


004750 


010246 








MOV 


R2, -(SP) 


/SAVE R2 ON THE STACK 


2161 


004752 


012702 


004762 






MOV 


«25,R2 


/SET RETURN ADDRESS FOR TIMER 


2162 


004756 








IS. 








2163 


004756 


000163 


0044B0 






JMP 


TIHER(R3) 


/GO TO TIMER & RETURN VIA R2 


2164 


004762 


032704 


OOUQOO 




25 


BIT 


«4000. R4 




2165 


004766 


001773 








BEQ 


15 




2166 


004770 


012602 








MOV 


CSP)*,R2 


.RESTORE R2 


2167 


004772 


000207 








RTS 


PC 




2168 


















2169 










, THIS 


SUBROUTINE flLLOHS fl CALLER SPECIFIED DELAY (UP TO 65MS ) 


2170 










, CALL. 


MOV 


DELAY TinE.OELTIM 


;LOAD DELAY TIME ( IN US) 


2171 












JSR 


PCDELAYV 




2172 


004774 


005767 


174120 




DELRYV 


TST 


OELTIM 


; BRANCH IF 0 DELAY 


2173 


005000 


001413 








BEQ 


35 




2174 


005002 


004767 


177352 






JSR 


PC.TinON 


;TURN TIMER ON 


2175 


005006 


010246 








nou 


R2,-(SP) 


/SAVE R2 ON THE STACK 


2176 


005010 


012702 


005020 






MOV 


t25«R2 


/SET RETURN ADDRESS FROM TIMER 


2177 


005014 








IS 








2178 


005014 


000163 


00X450 






JMP 


TmER(R3) 


;G0 TO TIMER & RETURN VIA R2 


2179 


005020 


023704 


con 20 




2i 


CMP 


dl0ELTIM,R4 




2180 


005024 


101373 








BHI 


15 




2181 


005026 


012602 








MOV 


(SP)*/R2 


; RESTORE R2 


2182 


00S030 


000207 






35 


RTS 


PC 




2183 


















2184 












SBTTL 


DIVIDE SUBROUTINE 




2135 










.THIS 


SUBROUTINE DIVIDES fl DOUBLE PRECISION 9 AND RETURNS THE RESULT 


2186 










,T0 THE CRLLER 


ON THE STACK BOTH DIVIDEND I DIVISOR MUST BE POSITIVE 


2187 










,COLL 


MOV 


LEAST SIGNIFICANT HALF 


DIVIDEND, -(SP) 


2188 












MOV 


ftMOST SIGNIFICANT HALF 


DIVIDEND/-(SP) 



DZTUG-B Tr02/TE16 DRIVE FUNCTION TIMER nflCYU 30(1046) 02-DEC 



C 

■77 



S 

09 



HS PAGE 64 



SEQ OOEM 





Pti 02-DEC-77 


HQ U(> 
U7 to 


n 1 if 1 np 


SUBROUTINE 


91 fiQ 








/ 


MOV 


IDIVISOR.-(SP) 










/ 


JSR 


PC, DIVIDE 


91 Q1 








' PPTUBN 






91 








4 


(SP) = 


REMRINDER ON STRCK 


91 








0 


2(SP) 


: QUOTIENT 


91 QU 














91 QC 








: NOTE 


THIS 


SUBROUTINE DESTROYS 


91 Qt> 
^ 1 70 














91 Q7 
^ I 7f 


005032 


005046 




D 1 U 1 DE 


CLR 


-(SP) 


7 1 QB 
^ |70 


005034 


012746 


UUUU C I 




MOV 


«17. ,-(SP) 


? 1 QQ 
^ 1 77 


005040 


016601 


nnnm 9 




nou 


12(SP)/R1 


79nn 


005044 


016600 


nnnm n 

UUUU i u 




MOV 


10(SP),RO 


1 


005050 


016602 


nnnnnt* 

UUUUL^D 




MOV 


6(SP),R2 


77n9 


005054 


005402 






NEG 


R2 


99m 


005056 


000241 






CLC 






005060 


000405 






BR 


2% 




005062 


006100 




1% 

1 s 


ROL 


RO 




005064 


010003 






MOV 


R0,R3 




005066 


060203 






ROD 


R2.R3 


99no 


005070 


103001 






BCC 


21 


99nQ 


005072 


010300 






MOV 


R3,R0 


791 n 


005074 


006101 






ROL 


Rl 


991 1 


005076 


005316 






DEC 


(SP) 


991 9 


005100 


001370 






BNE 


IS 


991 7 


005102 


005726 






TST 


(SP) + 


22m 


005104 


005726 






TST 


(SP)* 


2215 


005106 


010166 


000006 




MOV 


R1,6(SP) 


2216 


005112 


010066 


000004 




MOV 


R0,4(SP) 


2217 


005116 


012616 






MOV 


(SP)+, (SP) 



SAVE LOC FOR SIGNS 
SET ITERATION COUNT 
GET LSH DIVIDEND 
GET MSH DIVIDEND 
GET DIVISOR 
NEGATE DIVISOR 
CLEAR 'C BIT IN PSW 

ROTATE nSH DIVIDEND 
SAVE IN R3 

SUBTRACT DIVISOR FROM MSH DIVIDEND 
BRANCH IF DIVIDEND > DIVISOR 
SAVE REMAINDER IN RO 
ROTATE LSH DIVIDEND 
DECREMENT ITERATION COUNT 

,POP ITERATION COUNTER 
;POP SIGN CORRECTION 
,PUSH REMAINDER ON STACK 
,PUSH QUOTIENT ONTO STACK 



D S 
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CZTUGC PI I 02-0EC-77 09 H6 DIVIDE SUBROUTINE 



1 O 


nnc 1 7n 


nnn9n7 
UUU^Ur 






D TC 


PC 




'>') \ Q 


























CD TTI 

SoTTL 


DRIVE SUBROUTINES 














CllDDAIlTlUr TA 

/ dUBKUU 1 1 nfc. I U 


CHECK IF DRIVE IS RVRILRBLE 


LLLl 










/LRLL nUVD 


ORIVEI.DRVNUn 














ICD 


rC> DkVhVh 














DC Tl IDkl 

/ Kb 1 UKN 


C BIT SET IF NOT 


HVHI LnBLr 


222S 


005122 


113765 


001010 


000010 


DRVAVP nOVB 


^ttnDtfklllM ^C7/DC\ 

•lUKVNUn/ CaZlKS ) 


1 Ann no i mc a 

/LORD DKIVL K 


2226 


005130 


032765 


OHOOOO 


000026 


BIT 


• TQB nT { DC ^ 

w 1 Hr/ U 1 (Kb ' 


/ LntLK Ir IHrt UNI 1 


?997 


nnci 7t 
UUb 1 Jb 


nni nn7 






bnt 


1 % 








UUM f Of 


nnnn7ii 

UUUU jH 




ICD 


or DU 1 ij 1 T 
rL/ KM 1 N 1 1 






nnc 1 uu 


uuu^o^ 






St V 




■CCT ' \t ' Tn 1 kin UAT QWQ 1 1 

/ at 1 V lU \nv NOI Huh 1 L 


7771 


UU9 1 to 


nnn9n7 

UUU^U f 






1 C DTC 

la Kid 


or 


DCTIIDM 
/ Kt 1 UKn 


•.Z J 1 










' 9UDKUU 1 1 nc 1 V 


ruefn ir Trie ci a\ir 

LncL^ Ir ILID SLHvC 


IC awaiiQflir rnD tcct 

19 HVnlLHOLC r vK IL9I 














UK 1 VL w>tiwUKvnun 


■ DQCC no 1 t(C M t( 1 O nDWMIIM 
/ rnSS UK 1 Vt w VIH UKVnUn 


"•^ 7U 












SLRVE •.aiSLVNUn 


;PRSS SLRVE • VIR SLVNUn 














PCSLVRVfl 


;CRLL SUBROUTINE 


777fc 




1 1 D9 


nni n n 

uu 1 U 1 u 


nnnni n 

UUUU 1 u 


CI UQl/Q- MnUR 


dlDRVNUn,CS2(R5) 


;LORO DRIVE • 


7777 


UU9 1 9D 


1 1 77<,C 
1 1 D9 


nn 1 r, 1 1 
UU lull 


nnnn79 

UUUU 


riv vD 


d«SLVNUn.TC(R5) 


;RNO SLRVE 1 


77 7B 


nni;i <.u 

UU9 1 Dt 




nn7nnn 
uu^uuu 


nnnn'^fc 

UUUUfcO 


R 1 T 
D 1 1 


ISPRfDT(R5) 


■BRRNCH IF SLRVE PRESENT 




nnci 77 

UU9 \( L 


nni nni 
uu 1 uu 1 






BNE 


IS 




99un 


UU9 1 ^ 


nnn7t7 

UUUteD4> 






SEV 




;SET 'V TO INDICRTE NO SLRVE 




nnm 7^ 

UU9 1 r D 


nnn7n7 

UUU^U r 






IS RTS 


PC 




99U9 


























-SUBROUTINE TO 


INITIRLIZE RH CONTROLLER 












,CfiLL JSR PCRHINIT 




















9911 C> 


nnc;9nn 


ni 77fc<; 


nnnnun 

uuuut u 


UUUU 1 u 


PHiNiT nov 


imO,CS2(R5) 








I I •jl DO 


001 ni n 

uu 1 U 1 u 


noon ID 


novB 


dlDRVNUn,CS2(R5) 




99UB 


nnc9iii 


UU9U*f O 






CLR 


-(SP) 




99UQ 


nnc9i 

UU9^ 1 o 


1 1 771». 
1 Ur ID 


nni ni i 

UU 1 U 1 1 




flOVB 


dtSLVNUn, (SP) 




99Rn 


nnc999 

UU9^^^ 


U 1 ^DD9 


nnnn?? 

UUUU 




nov 


(SP)*,TC(R5) 


.LORD SlRWE 8 INTO TC REG 


99t 1 


nnc99<. 

UU9^^0 


U9^r D9 


nnn7nn 

UUU JUU 


nnnn77 

UUUU J ^ 


BIS 


IN0Rnil,TC(R5) 




99C9 


nn(;97u 

UU9^ijt 


nnn9n7 

UUU^Ur 






RTS 


PC 




99C7 


























.SUBROUTINE TO 


URIT FOR DRIVE RERDY (OPY) 


79CC 


UU9^ ob 


UU9UAr 






URITRDY CLR 


(PC)* 


,CLERR URIT TinER 




nnc9iin 

UU9^*tU 


nnnnnn 

UUUUUU 






UP ITT in UORD 


0 




79C7 


nnR9u9 


1 U9r 09 


nnnni 7 

UUUU 1 L 




IS TSTB 


0S(R5) 


,URIT FOR RERDY TO SET 


79CC 


nnc9iic. 

UUbZHb 


1 nniint. 

1 UUHUb 






Bni 


2S 




77CQ 


nnc9cn 

UU9m9U 


nnc9<.7 

UU9^0r 


1 777feU 
1 f f f OH 




INC 


WfllTTIM 


, INCREnENT URIT TinER 




nnc9cii 

UU9^9H 


nni 779 

uu 1 or Z, 






BNE 


IS 


; BRRNCH IF TinE MRS NOT EXPIRED 




nnc 9C& 


nnnnnii 

UUUUUH 


ni cm 7 

Ul SU 1 ■i 




TYPE.E. 


TinEXP 


.TYPE 'TinE EXPIRED UfllTING FOR RDY 


77£.7 


nnc9<.9 


nnnii9c 

UUUHZb 






BR 


99S 


,TRKE ERROR EXIT 


99t 7 


nnc9£.ii 


n 797<.C 

U JZf b9 


nn7nnn 

UUUUUU 


nnnni 7 

UUUU 1 i. 


2S BIT 


•E0T,DS(R5) 


/CHECK FOR END OF TRPE 




nnc979 


nni ii 1 c 

uu 1119 






BEQ 


3i 


.BRRNCH IF NO EOT 






nnnnnii 

UUUUUf 


ni un(>n 

U 1 tUDU 




TYPE.n. NRtl 






nnc7nn 

UU9 JUU 


nnnnnu 

UUUUUH 


ni ii 77t. 

U 1 Uf D 




TYPE,n. EOT 


;TYPE "END OF TAPE' 


77t7 


nnc7nu 

UU9 JU1 


nnL7<.7 

UUH f Of 


nnnn77 

UUUU 




JSR 


PC, REUIND 


/REUIND SLRVE 


22feS 


0053 10 


102m 2 






BVS 


99S 


/BRRNCH IF ERROR ON REUIND 


2269 


005312 


00M767 


000106 




JSR 


PCURITE 


;URITE R RECORD 


2270 


005316 


005215 






INC 


(R5) 


/SET 'GO' BIT 


227t 


005320 


00H767 


177712 




JSR 


PCUfllTRDY 


/URIT FOR RERDY 


2272 


00532H 


ooo^o^ 






BR 


99S 


zTRKE ERROR EXIT 


2273 


005326 


032765 


OH 0000 


000012 


3S BIT 


•ERR.0S(R5) 


/CHECK ERROR EVIT 



DZTUG-B TtlOZ/TElb DRIVE FUNCTION TltlER nflCYll 30(10Hb) 02-DEC-77 09- H8 PfiGE 56 SEQ 0066 

CZTUGC P\\ 02-DEC-77 09- DRIVE SUBROUTIK'ES 

227H 00533^ OOmOl BEQ lOOf 

227B 005336 000262 99S SEV 

2276 0053'»0 000207 lOOS RTS PC 



F 5 

DZTUG-B Tn02/TElb DRIVE FUNCTION TIMER MfiCYll 30(lOHb) 02-DEC-77 09 ^8 PAGE 57 SEC 0067 

CZTUGC Pll 02-DEC-77 09 ^b DRIVE SUBROUTINES 

227? .SUBROUTINE TO REMIND fl UNIT (DRIVE/SLRVE COMBlNRTtON) 

:2^9 ;CRLL nOVB DRIVE l.dtDRVNUK 



DZTUG-6 TnOZ/TElb DRIVE FUNCTION TIMER 
C2TUGC Pll 02-0EC-77 09 

2280 
22S1 
22S2 
Z2S2 
"'28'* 

2286 0053H2 00H7b7 I77b32 



MRCYII 30(10Hb) 02-DEC 
DRIVE SUBROUTINES 



G 
•77 



5 

09 



PRGE 58 



SEQ 0068 



nOVB SLAVE l.dfSLVNUn 

JSR PC/ REUIND 
'subroutine returns TO CRLLER UITH SELECTED SLRVE PT 
.AN ERROR OCCURS 



'BOT', i 'V SET IF 



REUIND JSR 



PCRHINIT 



, INITIRLIZE CONTROLLER 



H 5 

DZTUG-B Tn02/TElb DRtWE FUNCTION TlflER HOCYU 30(1046) 02-DEC-77 09 48 PACE 59 SEQ 0059 

C2TUGC PU 02-DEC-77 09 46 DRIVE SUBROUTINES 



22S6 


005346 


004367 


000206 






JSR 


R3. TMCHD 




.GO TO Tn COnnRND SUBROUTINE 


2287 


005352 


000000 








UORD 


0 




.BUS RDDRESS (NOT USED) 


2288 


005354 


OOOOOC 








UORD 


0 




;UORD COUNT (NOT USED) 


2289 


005356 


000000 








UORD 


0 




.FRRnE COUNT (NOT USED) 


2290 


005360 


000006' 








UORD 


RUD 




.REUINO connRND 


2291 


005362 


005215 








INC 


(R5) 




;SET 'GO' BIT 


2292 


005364 


032765 


000002 


000012 


IS 


BIT 


•B0T.0S(R5) 




.BRRNCH IF 'BOT' SET 


2293 


005372 


001005 








BNE 


2t 






2294 


005374 


032765 


040000 


000012 




BIT 


«ERR.DS(R5) 




.CHECK ERROR BIT 


2295 


006402 


001006 








BNE 


99f 




.BRRNCH IF ERROR BIT SET 


2296 


005404 


000767 








BR 


It 






2297 




















2298 


005406 


032765 


020000 


000012 


2S 


BIT 


«PIP.DS(R5) 




.URIT FOR TRPE MOTION TO STOP 


2299 


005414 


001374 








BNE 


2t 






2300 


005416 


000401 








BR 


100S 






2301 


005420 


000262 






995 


SEU 








2302 


005422 


000207 






lOOS 


RTS 


PC 






2303 




















2304 










.SUBROUTINE TO 


URITE 256 UORD 


RECORD 




2305 










.CRLL 


JSR 


PC. URITE 






2306 




















2307 


005424 


00436? 


000130 




URITE 


JSR 


R3. TncnD 




.GO TO Tn connRND SUBROUTINE 


2308 


006430 


016420 








UORD 


UTBUF 




.BUS RDDRESS 


2309 


005432 


177600 








UORD 


URDCNT 




.UORD COUNT 


2310 


006434 


17^400 








UORD 


FRnCNT 




.FRRnE COUNT 


2311 


005436 


000060 








UORD 


UFUD 




.URITE FORURRD COnnRND 


2312 


005440 


00020"' 








RTS 


PC 






2313 




















2314 










.SUBROUTINE TO 


RERD R 256 UORD RECORD 




2315 










,CfiLL 


JSR 


PC. RERD 






2316 




















Z31 r 


006442 


UU4 J 


UUbbbU 




RERD 


JSR 


R3.d«TncnD 






2318 


005446 


016420 








UORD 


RDBUF 




■RDDRESS OF RERD BUFFER 


2319 


006450 


177600 








UORD 


URDCNT 




.2'S COnPLEnENT OF UORD COUNT 


2320 


006462 


177400 








UORD 


FRMCNT 




.2'S COnPLEnENT OF FRRnE COUNT 


2321 


0064 B4 


000070 








UORD 


RDFUD 




.RERD FORURRD COnnRND 


2322 


006466 


000207 








RTS 


PC 






2323 
2324 










.SUBROUTINE TO 


INITIRTE RERD REVERSE COHIIRND 


2325 










,CfiLL- 


JSR 


PC. REVRD 






232b 




















2327 


005460 


004367 


000074 




REVRD 


JSR 


R3, TncnD 






2328 


006464 


017020 








UORD 


RDBUF -^256 




.RDDRESS OF RERD REVERSE BUFFER 


2329 


005466 


177600 








UORD 


URDCNT 




.2'S COnPLEnENT OF UORD COUNT 


2330 


005470 


177400 








UORD 


FRnCNT 




.2'S COnPLEnENT OF FRRnE COUNT 


2331 


005472 


000076 








UORD 


RDREV 




.RERD REVERSE COnnRND 


2332 


005474 


000207 








RTS 


PC 






2333 




















2334 










.SUBROUTINE TO 


SPRCE FORURRD 1 


RECORD 




2335 


005476 


012765 


\77777 


000006 


FUDSPC 


nov 


«-l.FC(R5) 




.LORD RECORD COUNT 


2336 


005504 


012715 


000031 






now 


HSPCFUD^l. (R5) 




.LORD connRND 


2337 


005610 


004767 


177522 






JSR 


PC.UfllTRDY 




.URIT FOR RERDY 


2338 


005514 


000207 








RTS 


PC 




.RETURN 


2339 
2340 










SUBROUTINE TO 


URITE R RECORD 


RND BRCK 


SPRCE OVER THE RECORD 


2341 


005516 


004767 


177702 




14RT BK 


JSR 


PC. URITE 




.URITE THE RECORD 



I B 

[ZTUG B Tn02/TElb DRIVE FUNCTION TinER nOCYll 30(10H6) 02-0EC-77 09 H8 POGE 60 
f-ZTUGC PU 02-DEC-77 09 Hfe DRIVE SUBROUTINES 



SEQ 0060 



23'42 


005522 


005215 






INC 


(R6) 


.SET 'GO' BIT 


2343 


005524 


004767 


177606 




JSR 


PC. URITRDY 




2344 


005530 


102412 






BUS 


2f 




2345 


005532 


012765 


\77??7 000006 




MOV 


«-l. rC(R5) 


.LORD RECORD COUNT 


234b 


005540 


012715 


000033 




MOV 


ISPCREV^l/ (R&) 


/LORD COMMRNO 


2347 


005544 


004767 


177466 




JSR 


PC. URITRDY 




2348 


006650 


102402 






BVS 


2S 




2349 


006662 


004767 


177166 


IS 


JSR 


PC.DELRY 


/URIT FOR TRPE MOTION 


2 360 


006666 


000207 




2S 


RTS 


PC 




2361 
2352 








.SUBROUTINE TO 


LORD R COMMRNO 




2363 








.COLL 


JSR 


R3. TnCMD 




2354 










UORO 


BUS RDDRESS 




2355 










UORO 


UORO COUNT (2'S 


COMPLEMENT) 


2356 










UORO 


FRRME COUNT (2 


S COMPLEMENT) 


235"' 










UORO 


COMMRND 




2368 
















2369 


005560 


012365 


000004 


TMcno 


MOV 


(R3)*.Bfi(R5) 


.-LORD BUS RDORESS 


2360 


005564 


012365 


000C02 




MOV 


(R3)*,UC(R5) 


.LORD UORD COUNT 


2361 


005570 


012365 


000C.06 




MOV 


(R3)+.FC(R5) 


.LORD FRRME COUNT 


2362 


005574 


C12315 






MOV 


ikZ)*. (R6) 


;LORD COMMRNO 


2363 


006676 


000203 






RTS 


R3 


.RETURN 


2364 
















2365 










•SUBROUTINE TO PRINT TE16 SERIAL NUMBER 


2366 










, JSR 


PC. SNPT 




2367 
















2368 


005600 


016503 


000030 


SNPT 


MOV 


SN(R5).R3 




2369 


005604 


012701 


001150 




MOV 


fOOIGlTS.Rl 




2370 


005610 


000303 






SUflB 


R3 




2371 


005612 


006003 






ROR 


R3 




2372 


005614 


006003 






ROR 


R3 




2373 


005616 


006003 






ROR 


R3 




2374 


006620 


006003 






ROR 


R3 


GET FIPST DIGIT 


2375 


005622 


042703 


177760 




BiC 


f 177760. R 3 




2376 


005626 


052703 


000260 




BIS 


1260. R3 




2377 


005632 


110321 






M0V6 


R3. i8\)* 


.FILL FIPST DIGIT 


2378 


005634 


016503 


000030 




MOV 


SN(R5).R3 




2379 


005640 


000303 






SUflB 


R3 




2380 


006642 


042703 


177760 




BIC 


il77760,R3 




2381 


006646 


062703 


000260 




BIS 


1260. R3 




2382 


005652 


110321 






novB 


R3. (RD* 


.GET SECOND DIGIT 


2383 


005654 


016503 


000030 




MOV 


SN(R5).R3 




2384 


006660 


006003 






ROR 


R3 




2386 


005662 


006003 






ROR 


R3 




2386 


005664 


006003 






ROR 


R3 




2387 


005666 


006003 






ROR 


R3 




2388 


005670 


0H2703 


177760 




BIC 


I177760.R3 




2389 


006674 


062703 


000260 




BIS 


1260. R3 




2390 


005700 


110321 






MOVB 


R3. (RD* 


.GET THIRD DIGIT 


2391 


005702 


016503 


000030 




MOV 


SN(R5).R3 




2392 


006706 


042703 


177760 




BIC 


«177760.R3 




2393 


006712 


062703 


000260 




BIS 


I260.R3 




2394 


006716 


110321 






MOVB 


R3. (RD* 


.GET FOURTH DIGIT 


2395 


005720 


105011 






CLRB 


(Rl ) 


.TYPE SERIRL NUMBEP 


2396 


005722 


000004 


001150 




TYPE.ODIGITS 


2397 


006726 


000207 






RTS 


PC 


•RETURN 
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2zn 



K B 

DZTUG-B TtlOa/TElb DRIVE FUNCTION TltlER flRCYU 30(10H6) 02-DEC-77 09 HS PRGE 62 
C2TUGC Pll 02-OEC -77 09 ^^> DRIVE SUBROUTINES 



SEQ 0062 



77 








uu 


















UUwr iJU 


KJl Cf UD 


nnnfcnn 

uuuouu 










































714DR 
































214 12 


00573*4 


00*4767 


005732 

WWW f w 




0057*40 


006767 


173020 




0067*4*4 

WWW ■ 1 • 


001001 

WW I WW I 






0067*46 


000*410 

www ■ aW 






005750 


032737 


020000 

W M WW WW 


2m 7 


005756 


001*40*4 




2m 8 


005760 

WWW ( WW 


00000*4 

WW W WW ' 


01*4036 


2m 9 


00576*4 


000167 

WWW i W 1 


00577*4 


2H20 








2H21 








ZHZ2 








2'* 23 


005770 


0137*46 


000006 


2H2'* 


00577*4 


0137*46 


00000*4 


2H25 


006000 


012737 


006020 


2'* 2b 


006006 


022777 


\77777 


2H27 


00601*4 


001*402 






006016 

W WW W A W 


000*40*4 




2H29 


006020 


022626 




2H30 


006022 

w W w www 


012767 


000176 


2H31 


006030 


012637 


00000*4 


2432 


00603*4 

www w T 


012637 


000006 


2433 


0060*40 

wwww « w 


022737 


000176 


24 3H 


0060*46 


001002 




2H35 


006050 

W www WW 


00*4767 


173760 


2>4 3b 


00605*4 

WWWW w « 


1 06037 


001130 


2*4 37 


006060 


106037 


001126 


2438 


00606*4 

www WW ( 


106037 


OQl 126 


2*4 39 


006070 


105037 


001127 


2H^0 


00607*4 


105067 


17303*4 


2'4m 


00b 100 


012737 


000006 


2*4 "42 


006106 


012737 


000002 




OObl 1*4 


006037 


001270 


2>4'4'4 








2*4*46 








2*4*46 








2*4*47 








2*4>48 








2HH9 








2H50 


00b 120 


005767 


1726*42 


2^B1 


00b 124 


oomo2 




2M52 


00b l?b 


000167 


000662 


2M53 








24 









INIT- 



000052 IS. 



SUSUR 



000004 
172''64 



blS: 

172760 60S 
62S- 



001000 



64S 



000004 
000006 



2S 



SBTTL PROGRRn INITIPL'ZPTION 
flOV ISTKPTR.SP .SET STRCK PTR 

ttttttt noDiFiED n-8-77 tuuttuututtttttututtutu 

DIAGNOSTIC SETUP FCR EXECUTION 
UNDER flCTll 

+ 
+ 



JSR 

TST 

BNE 

BR 

BIT 

BEQ 



PC.CKnODE 

flUTOn 

IS 

SUSUR 

120000. d«62 
SUSUR 



TYPE.riSGB 
jnP ABORT 



; CHECK FOR nODE OF OPERATION 
;flUTOnflTIC nODE? 
'BRANCH - IF YES 

; CHECK SUITCH REGISTER IN OUnP nODE 
;hANUAL INTERVENTION'? 
; BRANCH - IF NO 
;TYPE ABORT riESSAGE 
;AND ABORT THE PROGRAH 



tuttttttttttttttttttttttttttttttttuuttttttttttttttttttt 



nov di6. -(SP) 

MOV dl4,-(SP) 

nov I6is.ai4 

cnp t-i.asuR 

BEQ bOf 

BR b2t 

CUP (SP)*, (SP)* 

nov ISUREG. SUR 

nov (SP)^,dlH 

nov (SP)*.atb 

cnp isusEG.aisuR 

BNE 6HS 

JSR PCCNTLU 

CLRB atPRGFLG 

CLRB ailTCNT 

CLRB aiTSTNUn 

CLRB aiERFLG 

CLRB ASFLG 

nov IERRVEC*2,atERRVeC 

nov tRTLaiERRVEC4>2 

CLR atlNBUF 



.SAVE VECTORS 

.SET UP FOR TiMEOUT 
.REFERENCE HARDUARE SUITCH REGISTER 



.-ADJUST STACK 

.POINT TO SOFTUARE SUITCH REG 
RESTORE VECTORS 



.CLEAR PROGRAn FLAG 
.CLEAR ITERATION COUNT 
.SET TEST « 0 
.CLEAR ERROR FLAG 
; CLEAR ASK FLAG 

;CHECK IF 'LP' IS AVAILABLE 



ututnt nooiFiEO 11-8-77 uuuttttttttttttttttttttttt 

IF IN fiCTll nODE INHIBIT TYPING PROGRAn 
IDENTIFICATION AND nANUAL INTERVENTION 



TST ACTlltl 
BEQ 7S 
jnP SIZE 



;AUTOnATIC nODE'' 
.BRANCH - IF NO 
.START THERE 



tttttttnttttntttntntttttutttttttttnttttttii ttttttttttttttn 



L S 

DZTUG-B TH02/TE16 DRIVE FUNCTION TlflER HflCYll 10(1046) 02-DEC-77 09 US PfiGE bZ 
CZTUGC Pll 02-0EC-77 09 >4b PROGRflM INI T IRL IZRT ION 



SEQ 0063 



2455 








ZHSb 


0061 32 






2H57 








ZtBS 


006132 


000004 


001400 


2459 


006136 


000004 


A 4 1 ■ A ^ A 

014060 


24 bO 


006142 


A A A A Al ■ 

000004 


0141 16 


24bl 


006146 


004767 


175326 


24b2 


0061B2 


004767 


175106 


24b3 


006 1S6 


013737 


A A 4 A A A 

001 122 


24b4 


006164 


01370B 


001014 


24 b5 








^4bb 








24b7 


006170 


00C261 




2468 


006172 


00B716 




24 b9 


006174 


103003 




24"0 


006176 


000004 


014435 


;h"i 


006202 


000652 






006204 


012737 


003654 



7S 



001014 



4f 

5S 



TYPE,CRLF 
TYPE,n. NRH 
TYPE. I REG 
JSR 
JSR 
hOV 

nou 



PC. INPUT 
PC.CNUTflO 
aiOCTRLO.dlTnBnSE 
aiTMBflSE.RS 



000004 



.ROUTINE TO CHECK IF CONTROLLER (RHll) 
SEC 
TST 
BCC 

TYPE.E 
BR 

6S nov 



(R5) 
6f 

NCON 
INIT 

«ERRTRP,dlERRVEC 



;TYPE TITLE 

;PSK USER TO TYPE CONT BPSE flORS 
.GET USER INPUT 
.-CONVERT PSCII TO OCTAL 
.SET NEU ADDRESS 



IS PVfllLPflBLE 
;SET 'C IN PSU 
; BRANCH IF CONTROLLER AVAIL 



SET ERROR TRAP VECTOR 



DZTUG-B TtlOZ/TElb DRIVE FUNCTION TIHER 
C2TUGC Pit 02-DEC-77 09 



2H73 
2*474 
2475 
2476 
2477 
2478 
2479 
2480 
2481 
2482 
2483 
2484 
2486 
2486 
2487 
2488 
2439 
2490 
2491 
2H92 
2H93 
2494 
2H96 
2496 
2497 
2498 
2H99 
2600 
2601 
2602 
2603 
2604 
2606 



2626 
2627 
2628 



006212 
006216 
006222 
006226 
006230 
006232 
006234 
006240 
006244 
006260 
006264 
006266 
006262 
006266 
006272 
■006276 
006300 
006302 



106037 
012701 
012700 
006021 
006300 
001376 
000004 
004767 
012700 
122710 
001013 
11C667 
0127rjl 
012700 
012721 
006300 
001374 
000417 



001127 
001160 
000004 



014163 
176234 
001270 
000101 

172646 
001160 
000004 
\77777 



nflCYll 30(1046) 
PROGRPn 



DRIVES 



02-DEC 



n 

■77 



6 

09 



48 PAGE 64 



If 



2S 



006304 122710 000016 

006310 001414 

006312 121027 000064 

006316 001001 

006320 ; 06720 

006322 112001 

00632H 042701 

006330 112761 

006336 000240 

006340 000761 



177770 

\77777 001160 



3S 



4S 



INITIAL IZflT ION 




TO GET 


THQ2 DB 1 UES USER 


DESIRES TO TEST 


CLRB 

^ k n D 


aiERFLG 


/CLEAR ERROR FLAG 


nov 


f DRVTBL< Rl 


;nARK ALL DRIVES AS NOT TO 


flOV 


i4/ RO 


/BE TESTED A '0' INDICATES 


CLR 


(Rl )^ 


/THAT A DRIVE IS NOT TO BE 


DEC 


RQ 


; TESTED 


8NE 


\% 




TYPE/ 1. 


OR US 




JSR 


PC, INPUT 

1 ^ / • 1 111 w 1 


/GET USER INPUT 


nov 


K INBUF/ RO 




cr^PB 


K ' A/ (RO) 


/AN 'A* SPECIFIES ALL 


BNE 


3f 


; DRIVES TO BE TESTED 


novB 


SP.PRGFLG 


;SET FLAG TO IND ALL DRIVES 


MOV 


tDRVTBL.Rl 


;nARK ALL DRIVES TO BE TESTED 


MOV 


14, RO 


;A ''1' INDICATES THAT A DRIVE 


nov 


• -1, (RD* 


; IS TO BE TESTED 


DEC 


RO 




BNE 


2S 




BR 


CHKDRV 


;G0 CHECK DRIVE AVAILABILITY 


.R SELECTED DRIVES AND HARK EACH DRIVE SELECTED TO BE TESTED 


CMPB 


ICR. (RO) 




BEQ 


CHKDRV 




CMPB 


(RO),l\ 


; CHECK IF 'COriflA- 


BNE 


4S 




TSTB 


(R0) + 


/STEP PTR PAST 'COHHA' 


novB 


(R0)^,R1 




BIC 


1177770, Rl 




novB 


«-l,ORVTBL(Rl) 




NOP 






BR 


3S 





SEQ 0064 



/ASCERTAIN THAT DRIVES (Tf102"S) SPECIFIED ARE AVAILABLE 



2606 


006342 


006000 




CHKDRV 


CLR 


RO 


.A 0/-1 INDICATES THAT THE 


2607 


006344 


106760 


001160 


IS 


TSTB 


DRVTBL(RO) 


/DRIVE IS NOT/ IS TO BE TESTED 


2608 


006360 


001006 






BNE 


3S 




2609 


006362 


006200 




2S 


INC 


RO 




2610 


006364 


122700 


000010 




CflPB 


«8. / RO 




2511 


006360 


001371 






BNE 


15 




2512 


006362 


000421 






BR 


45 




2613 


006364 


'10037 


001010 


35 


novB 


RU/dlDRVNUn 




2514 


006370 


•w4737 


006122 




JSR 


PC/dlDRVAVA 


/CHECK IF AVAILABLE 


2616 


006374 


102366 






BVC 


25 


/'V BIT SET INDICATES NOT AVAIL 


2616 


006376 


000004 


014602 




TYPE/E. 


NDRV 




2517 


006402 


116037 


001136 014634 




novB 


DIGTflB(RO)/dtE. NAVA 


/SET DRIVE It IN MESSAGE 


2618 


006410 


000004 


014634 




TYPE,E. 


NAVA 


;SET 'ERROR' FLAG' 


2619 


006414 


110637 


001127 




novB 


SP/dlERFLG 


2620 


006420 


106060 


001160 




CLRB 


DRVTBL(RO) 


;nARK DRIVE UNAVAILABLE 


2621 


006424 


000762 






BR 


25 


/CHECK NEXT DRIVE 


2622 


006426 


106737 


001127 


45 


TSTB 


dlERFLG 


/GO GET SLAVES IF NO ERROR 


2623 


006432 


001403 






BEQ 


SLAVES 


/ASK USER TO RETYPE DRIVES IF 


2624 


006434 


105737 


001130 




TSTB 


dtPRGFLG 


2626 


006HH0 


001664 






BEQ 


DRIVES 


/ 'ALL' NOT SPECIFIED 



006442 106037 001127 



/ROUTINE TO GET SLAVES (TE16*S) USER 
SLAVES CLRB dtERFLG 



DESIRES TO TEST 

/CLEAR 'ERROR' FIRG 
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SEQ 0065 



2529 


006446 


012701 


001170 




nov 


iSLVTBL/Rl 


/HARK ALL SLr^VES (64. ) AS NOT 


2530 


006452 


012700 


000040 




nov 


«32. <R0 


/TO BE TESTED. A 0 INDICATES THAT 


2531 


006456 


005021 




IS 


CLR 


(RD* 


;A DRIVE'S SLAVE IS NOT TO BE 


2532 


006460 


005300 






DEC 


RO 


/ TESTED 


2533 


006462 


001375 






BNE 


1* 




2634 


006464 


005000 






CLR 


RO 


;R0 : DRIVE 8 FOR SLAVES 


2535 


006466 


012701 


001170 




nov 


iSLVTBL/ Rl 


;R1 POINTS TO DRIVE'S SLAVE 


2536 


006472 


105760 


001160 


2S 


TSTB 


DRVTBL(RO) 


; IF DRIVE IS TO BE TESTED 


2537 


006476 


001007 






BNE 


4% 


;G0 TO 4S OTHERUtSE 


2538 


006500 


062701 


OOGOlO 


3S 


ADD 


18. / Rl 


;STEP SLAVE PTR TO NEXT DRIVE S 


2539 


006504 


005200 






INC 


RO 


/'SLAVES AND INCREMENT DRIVE 8 


2540 


006506 


122700 


A A A A < A 

000010 




CMPB 


18 /RO 


/'CHECK ALL DRIVES 


2541 


006512 


001367 






BNE 


2S 


• Alia lit IP Al 1 AAltiPP ^1 IP ^ M P A 

;AND UHEN ALL DRIVES CHECKED 


2542 


006514 


000454 






BR 


CHKSLV 


>AA ^IJP^M Al At<P AkiAll AA II i V U 

/GO CHECK SLAVE AVAILABILITY 


25** 3 
2544 


006516 


105737 


001 130 


4$: 


TSTB 


diPRGFLG 


.BAALl^tl IP IIAPA API P^VPA Al I 

/BRANCH IF USER SELECTED ALL 


2545 


006522 


001020 






BNE 


5S 


; DR IVES 


2546 


006524 


1 10067 


172260 




novB 


RO/ DRVNUn 


• APT nBl\<P M 

/GET DRIVE 8 


2547 


006530 


1 16037 


001136 014244 




HOVB 


DIGThB(RO)/ «i 1 


ABi/ .BBPa ABP IIPPB A^Tl/\LI MPAPAAP 

DRV ; PREPARE USER ACTION MESSAGE 


2548 


006536 


A A AAA! • 

000004 


A m I ■ ^ A^ 

014225 




TYPE/ 1. 


SLVS 




2549 


006542 


004767 


174732 




1 PB 

JSR 


n ^ 1 UB 1 IT 

PC/ . INPUT 


• APT 1 lAP a 1 kJB 1 IT 

/GET USER INPUT 


2550 


006546 


012703 


001270 




MAI/ 

now 


R INBUr / K J 


'CrT D TB TA llCrS IklDIIT 

/SET PTR TO USER INPUT 


2551 


006552 


122710 


000101 




cnPB 


ff H/ (kO) 


BBOU^LI IC IICCB nACC klAT IIQklT 

/ 8KHNCH IP UScK DOES NOT UHNi 


2552 


006556 


4 n 4 p 

001015 






BNt 




• 'oi 1 ■ CI m/cc 
/ HLL SLHVES 


2553 


006560 


1 10637 


4 4 70 

001 13u 




novD 


SP/ •IPRur Lu 


CCT 'Ol 1 ' Iklfkl^OTAD 

/SET HLL IN0KHTOR 


Zbb4 


006364 


01 Zi'0 1 


UU 1 1 (^U 


cc 
ba 


nuw 


MCI t/TDI D1 

wsLV 1 dL/ K 1 


■ MQDIf Qi 1 CI QWrC PAD Ql 1 
/ nHK^ HLL oLHVLd r UK HLL 


2555 


006570 


012700 


000040 




nov 


832. / RO 


/DRIVES AS TO BE TESTED 


2556 


00657H 


n 4 O Tl O 4 

012721 


4 ^^^^^ 

1 77777 




MA\I 

now 


1-1/ IKl )♦ 




2557 


006600 


AAP A 

005300 






DtC 


Icu 




2558 


006602 


001374 






Bur 
BNE 


6t 




2559 


006604 


4 rt P ^ 

105737 


rm 4 4 

□01 130 




TCTO 

TSTB 


•IPKur Lu 


• DDnki^Li ic ni 1 line cci c^Tcn 
/ dKHNlH Ir HLL MHS StLtLitU 


2560 


006610 


00101b 






BNE 


CHKSLV 




2561 
















2562 


006612 


4 A 4 ^ 

122713 


A A A A a r" 

000015 


7% 


cnPB 


• ^ D / B 7 k 

RCR< vkj) 


ccT iicrD cci c^Tcn ci a\frc cab 
/ uc. 1 USLk SELECTLu SLHWES rOR 


2563 


006616 


001730 






Dm 




no 1 \ic 
/ UK 1 Wt 


2564 


006620 


4 A 4 ^ 

121327 


000054 




^ MD D 

CHrB 




CTCD BTD DOCT * ^AMMfl ■ 

/oltr riK rHbl LOnnH 


2565 


006624 


001001 






BNE 


8S 




2566 


006626 


105723 






TSTB 


(R3)* 




2567 


006630 


1 12304 




8S 


novB 


yn^kt nil 

(R3)+/ R4 


/AND MHRK SELECED SLAVE 


2568 


006632 


042704 


177770 




BtC 


•177770/ R4 


AC TA Dr TCCTCA 

• HS TO BE TESTED 


2569 


006636 


060104 






ADD 


B 4 B li 

Rl/ R4 




2570 


006640 


1 12714 


\7777? 




novB 


8-1/ (R4) 




2571 


006644 


000762 






BR 


7% 




2572 
2573 








,flSCERTfllN THAT 


Pi nifpp /TP4£.<C\ 

SLAVES CTE16 S) 


CCl C^TCA ADC OtIA 1 1 OBI C 

SELECTED HRE HWHILHBLE 


2574 


006^46 


005000 




CHKSLV- 


CLR 


B A 

RO 


DA 1111 1 ^AklTOlU TUC AO 1 \IC 

/ RO HILL CONTRIN Trie, DKIWL « 


2575 


006650 


005001 






CLR 


B 4 

Rl 


AklA B4 TLIC CI M 

/ HND Rl THE 5LHWE 8 


2576 


006652 


012702 


4 4 "> ^ 

001 170 




nov 


MCI WTDI D 9 

tsLVIHL/ Ki. 


• CCT DTD Trt CI out TOQI T 
/ oL 1 rIK lU SLHVt IHDLE. 


2577 


006696 


105760 


on 1 4 £.n 
001 1 bU 


1% 


TSTB 


UK U 1 DL I K U ^ 






OObbbZ 


UU tUUr 






BNE 




&. PVPILPBLF FOR TEST 


2579 


006664 


005200 




2% 


INC 


RO 


; INCREMENT DRIVE 8 


2580 


006666 


062702 


000010 




ADD 


88 /R2 


/STEP SLAVE PTR TO NEXT DRIVE'S 


2581 


006672 


022700 


000010 




CMP 


88 /RO 


/SLAVES BRANCH TO IS IF NOT ALL 


2582 


006676 


001367 






BNE 


IS 


/DRIVES CHECKED OTHERWISE EXIT 


2583 


006700 


000434 






BR 


7S 




2584 

















DZTUG-B Tn02/TElb DRIVE FUNCTION TItlER 
CZTUGC Pll 02-DEC-77 09 Hb 



2S8S 

2S86 

2587 

ZS88 

2589 

2B90 

2591 

2592 

2593 

259H 

2595 

2596 

2597 

2598 

2599 

2&00 

2b01 

2602 

2603 

260H 

2605 

2606 

2607 

2608 

2609 

2610 

2611 

2612 

2613 

26m 

2615 

2616 

2617 

2618 

2619 

2620 

2621 

262Z 

2623 

262U 

2625 

2626 

2627 

2628 

2629 

2630 

2631 

2632 

2633 

263H 

2635 

2636 

2637 

2638 

2639 

26>40 



B 6 

nnCYll 30(10Hb) 02-DEC-77 09 HS 
PROGRfln INITIRLIZRTION 



PPGE 66 



□□6702 


005001 






3S- 


CLR 


Rl / 


SET SLAVE • 0 


nnc ^nii 
□□b7^4 


105712 






4» 


TSTB 


(R2) / 


BRANCH IF DRIVE S SLAVE IS 


006706 


001006 








BNE 


bS 


ECTED FOR TEST 


006710 


005201 






5S. 


INC 


Rl 


INCREMENT SLAVE • 


OObr IZ 


005202 








INC 


R2 


STEP PTR TO NEXT SLAVE 


0067 m 


0ZZ7O1 


nnnn4 n 

000010 






CnP 


«8 ,R1 


GO TO IF ALL SLRVES NOT 


QQ67Z0 


nf%4 

001 Jrl 








BNE 


4t 


CHECKED 


UQ67ZZ 


DODrbO 








BR 


2t 


OTHERUISE GO TO 2% ABOVE 


0067Z4 


4 4 nn 77 
1 10037 


nn 4 n 4 n 
OQiOlO 




6S 


novB 


RO^aiDRVNun ;pnss drive & slave i 


006 7 JO 


1 10137 


nn 4 n 4 4 
00101 1 






nOvB 


Rl.dlSLVNUn 




nn£.'7 "71* 


nnii 7 77 
004 rjr 


0U9I9U 






ICD 


PCdISLVflVR ;nND CHECK IF RVRlLflBLE 


00o'"0 


4 no 7 
IDZJbJ 








BvC 


5t 


'V BIT SET ON RETURN IND- 


OOi 2 


116037 


001136 


014524 




novB 


DIGTRB(RO).dlE. DRV 


ICATES ERROR PREPARE ERROR 


006 7B0 


Mbl37 


001136 


014534 




novB 


DIGTRB(Rl),aiE. NRVR ;nESSRGE 


' 'bb 


nnnnu 


UiHblb 






TVDC C 


NSLV 




OObrbZ 


4 4 nc 77 

1 lObJr 


nni 4 77 

UD1 1 Z7 






MAUD 

novB 


SP.dlERFLG 


;SET ERROR INDICATOR 


UUbr bb 


1 UbUI ^ 








n DD 


(R2) 


CLEAR SLAVE TABLE ENTRY 


uuot r U 


nnn7U7 
UUUrHr 








OD 

dK 


5t 


;GET NEXT SLAVE 


006772 


105737 


001127 




75 


TSTB 


dtERFLG ;BRRNCH IF NO ERROR 


006776 


001403 








BEQ 


lOOf 




007000 


105737 


001130 






TSTB 


dIPRGFLG 


; BRANCH IF NOT 'ALL' 


007004 


001616 








BEQ 


SLRVES ;RSK USER TO RETYPE SLRVES 


007006 


012737 


0036B4 


0GGGG4 


IGGS 


MOV 


•ERPTRP^dlERRVEC 




UUr uiH 
























,scnN 


DRIVE RND 


SLAVE TABLE FOR DRIVE/SLAVE COnBINATION TO TEST 


007014 


105037 


001010 






CLRB 


dIDRVNUn ;SET DRIVE AND SLAVE S 0 


007020 


105037 


001011 






CLRB 


aiSLVNUn 




007024 


012737 


001170 


001012 




flOV 


SSLVTBLxdISLVPTR 


;SET PTR TO SLAVE TABLE 


UOr 0 


1 ncn 77 


nn 1171 
UUl 1 Jl 






CLRB 


aiUNTFND .CLEAR 'UNIT FOUND' INO 










/ 


ttttttnttttttttttttttttttttttttttttttttttttttttttttttt 










f 




nflCRO FOR SIZING DRIVES AND SLAVES 










f 




IN RUTOnRTIC nODE 




UUrOJe 


Ui ifbf 


1 77777 
\ff(f( 


171 71111 

1 r 1 r HH 


/ 


♦ 

nov 


S-l,DRVNUn 


: INIT DRIVE NUnBER 


nn7nii ii 
0070HH 


01Z7b7 


1 77777 

I f f f f f 


4 74 777 

\ (If if 


PlA 1 UKV 


MOV 


S-l,SLVNUn 


: INIT SLAVE NUMBER 


OOrOsZ 


7777 

01Z777 


000040 


4 7n7 7n 


1 9 


nov 


140/ dCS2 


; INIT CONTROLLER 


007060 


one 7 
009Z67 


4 71 7711 

1 71 7Z4 






INC 


DRVNUn 


;STEP DRIVE IS 


007064 


0ZZ7&7 


noon 4 n 
000010 


1 7 1 7 1 

1 71 <'lb 




cnp 


•lO.DRVNUn 


-ALL DRIVE TESTED'' 


UUr Ur A 


nni nn? 

UU 1 uu^ 








B^' 


IS 


; BRANCH - IF NO 


007074 


000167 


003746 






ir< 


FINISH 


;EXIT 


007100 


016777 


171704 


170702 


2S 


nov 


DRVNUn,aCS2 


,LORD DRIVE t 


007106 


005777 


1 70666 






TST 


acsi 


;RCCESS DRIVE 


007112 


032777 


010000 


170670 




BIT 


S10000,dCS2 


; NON-EX ISTRNT DRIVE"* 


007120 


001354 








BNE 


It 


.BRRNCH - IF YES 



C 6 

D2TUG-B TH02/TElb OPIVE FUNCTION TIMER fIflCYll 30(lOHb) 02-DEC-77 09 H8 PAGE 67 SEQ OOb? 

CZTUGC Pll 02-0EC-77 09- H6 PROGRPM INITIAL I ZRT ION 



26m 


007122 


00B267 


17i663 




NXTSLV: 


INC 


SLVNUn 


STEP SLPVE • 


26H2 


007126 


001010 








BNE 


It 


BRANCH IF NOT SLflV/E 0 


26M3 


0071 :0 


OOB/67 


1716B>I 






TST 


DRUNUtl 


DRIVE 0? 


26HH 


0071 3H 


001 OOB 








BNE 


It 


BRANCH - IF NO 


26H5 


007136 


105767 


17162B 






TSTB 


XXOPtI 


XXOP? 


26M6 


007m2 


oomo2 








BEQ 


IS 


BRANCH - IF NO 


26H7 


007mH 


00B267 


1716m 






INC 


SLVNUn 


STEP TO SLAVE HI 


26H8 


0071 BO 


022767 


000010 


171633 


IS 


cnp 


KlO.SLUNUn 


ALL DRIVES TESTED** 


26H9 


007 1B6 


001732 








BEQ 


NXTDRV 


BRANCH - IF YES 


26B0 


007160 


016777 


17162B 


1706HH 




nov 


SH/NUn,i)TC 


LOAD SLAVE UNIT'' 


26B1 


007166 


032777 


002000 


1 70632 




BIT 


«2000.dDT 


SLAVE PRESENT"* 


Z6S2 


0071 7H 


001 7B2 








BEQ 


NXTSLU 


BRANCH - IF NO (SPR=0) 


2663 


007176 


032777 


moooo 


170622 




BIT 


« moooo, dOT 


; IS DRIVE A TAPE UNIT** 


2661* 


00720H 


0017H6 








BEQ 


NXTSLV 


; BRANCH IF NO 



26BB 

Z6B6 UtttttttttttttttttttttttttttttttttttttUUttttttttttUtt 

ZbS7 

ZbBS 00''20b 113700 G0101G BEGIN MOVB dlDRVNUn.RO /GET DRIVE • 

26B9 oo"':i: inroi ooicii novB aiSLVNun,Ri ,and slave « 



D b 

DZTUG-B Tn02/TElb DRIUE FUNCTION TIHER MOCYtl JOdO'lb) 02-DEC-77 09 HB 
CZTUGC Pll 02-DEC-77 09 Hb PROGRRM INITIflLIZflTION 



2bb0 


007216 


013702 


001012 




nov 


dlSLUPTR,R2 


2bbl 


007222 


105760 


001 IbO 


IS 


TSTB 


DRUTBL(RO) 


2b62 


007226 


001011 






BNE 


3t 


2bb3 


007230 


005001 






CLR 


Rl 


26b^ 


007232 


062702 


000010 




ROD 


48 ,R2 


2668 


007236 


005200 




2S 


INC 


RO 


2666 


0072H0 


022700 


000010 




CMP 


»8 .RO 


2667 


007244 


001366 






BNE 


It 


2668 


007246 


000137 


013162 




jnp 


al«END 


2669 














2670 


0072B2 


105712 




3S 


TSTB 


(R2) 


2671 


007254 


001007 






BNE 


4S 


2b72 


007256 


005202 






INC 


R2 


2673 


007260 


005201 






INC 


Rl 


2674 


007262 


122701 


0000^0 




CMPB 


»8 .Rl 


2b75 


007266 


001371 






BNE 


3S 


:b^6 


007270 


005001 






CLR 


Rl 


2677 


00'2"'2 


000761 






BR 


2% 


2678 














2679 


00'274 


110637 


001131 


US 


novB 


SP.diUNTFNO 


2680 


OO'ZOO 


110037 


001010 




MOVE 


RO.dtDRVNUM 



PAGE 68 



SEQ 0068 



,GET SLAVE PTR 

, BRANCH IF DRIVE flVfllL TO TEST 
.CLEAR SLAVE « 

;PKD STEP PTR TO NEXT DRIVE'S 
, SLAVES AND INCREFIENT DRIVE I 
;EXIT TEST IF ALL DRIVES 
.CHECKED OTHERUISE CONTINUE 
/SCAN FOR NEXT 'UNIT' 

.BRANCH IF SLAVE ON DRIVE IS 
/AVAILABLE THERUISE STEP 

;PTR TO NEXT SLAVE 
; INCREriENT SLAVE i 
/•UNTIL ALL SLAVES CHECKED 
;UHEN ALL SLAVES CHECKED 
.SET SLAVE • 0 
.AND CONTINUE SCAN 

.INDICATE THAT A 'UNIT' IS FOUND 
.SET DRIVE 3 



e 6 
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C2TUGC Ptl 02-0EC-77 09 16 PROGRflM INITmLlZflTION 



2681 


00730<4 


110137 


001011 






novB 


Rl/dlSLVNUn 


/SET SLAVE • 


2682 
2683 


007310 


010237 


001012 






nov 


R2< dISLVPTR 


;SflVE SLAVE PTR 


268^ 


0073m 


10573/' 


001134 




5S 


TSTB 


dIRSFLG 




268S 


007320 


001047 








BNE 


7» 




2686 


007322 


1 12767 


000001 


171604 




novB 


ll.flSFLG 




2687 


007330 


105037 


001 1 30 






CLRB 


dIPRGFLG 


; CLEAR PROGRAn INDICATOR 


2688 


















2689 










/ 


ttttttttt nOOIFIED 8-11 


-77 xxxxxxxxxxxxxxxxxxxxxxxxxxxxx 


2690 


















^691 










/ 




CHECK FOP RUTOnflTIC MODE 


2692 
2693 


00733H 


005767 


171424 






TST 


flUTon 


;AUTOnATIC nODE'' 


269k» 
2695 


0073H0 


001037 








BNE 


TYPHDR 


/BRANCH - IF YES 


2696 












t%%%%xtttttt%ttttttt%tttttx%tt%ttttt%ttxxtttxt.%t.t%tt%%tt% 


2697 
2698 


0073M2 


000004 


014304 






TYPE. 1 

1 lib/ 1 




. QSK USFB IF HP UANTC TO RUN <:KP1J TPCT<: 


2699 


007346 


004767 


174126 






ICD 


r L » , 1 NrU 1 


*RCT ItCrO IIJOIIT 
/ Ut. 1 UdtK INrUI 


2700 


007352 


012703 


001 Z7G 






1 IV V 


w 1 no ur / f\ aj 


fiPT BPPI Y 


2701 


007356 


122713 


00006G 






CMPB 

^ 1 ir D 




'BRANrH IF 'NO' (H) 


2702 


007362 


001406 














2703 


00736M 


122713 


G0GG61 






fMPR 

^ 1 ir D 




THPfK IP 'YPC (1) 


270^ 


007370 


001351 








RNF 




'NPITHPR fl^K AGAIN 
/ lib 1 Iribn Piwi\ nun 1 n 


2705 


007372 


111337 


001130 






1 IV V D 




.^PT INDICATOR 


2706 


007376 


000420 








BR 


74 




2707 


















2708 


007400 


105037 


001133 








WW nn u u 


fLPAR NR7 INDIfflTOR 


2709 


007404 


000004 


014346 






TYPF 1 

1 1 r b / 1 


NR7 


. fl^K IKFff If nPlUr 'NP7' ONI Y 


2710 


007410 


004767 


174064 








pr INPUT 


'RPT IKPP INPUT 


2711 


007414 


012703 


001 270 






1 1 V V 


«INBUF.R3 


;GET REPLY 


2712 


007420 


122713 


000060 








t'O, (R3) 


/BRANCH IF 'NO' (0) 


2713 


007424 


001405 










74 




27m 


007426 


122713 


000061 






cnPB 


«'1. (R3) 


/CHECK IF 'YES* (1) 


2715 


007432 


001362 








BNE 


65 


/ASK AGAIN IF NEITHER 


2716 


007434 


111337 


001133 






novB 


(R3).StNRZFLG 


/SET INDICATOR 


2717 


















2718 


007440 








75 








2719 


















2720 


007H40 








TYPHDR- 








2721 


















2722 


007440 


052737 


000100 


177560 




BIS 


1100, dtTKS 


/SET KEYBOARD IE BIT 


2723 


007446 


000004 


015064 






TYPE.L. 


HDRl 




272H 


007452 


116037 


001136 


015244 




novB 


DlGTflB(RO), jIL 


DRV ;SET DRIVE S 


2726 


007460 


116137 


001136 


015256 




novB 


OlGTflB(Rl),dfL 


SLV ;AND SLAVE S 


2726 


007466 


112737 


000071 


015261 




novB 


• '9, dIL. CHRN 


;GET SLAVES CHANNEL TYPE 


2727 


007474 


032765 


010001D 


000026 




BIT 


iCH7,DT(R6) 




2728 


007S02 


001403 








BEQ 


15 




2729 


007S0M 


112737 


000067 


015261 




novB 


«'7,dtL. CHRN 


/SET 7 CHANNEL 


2730 


007512 


000004 


015177 




15 


TYPE,L 


HDR2 




2731 


007516 


004767 


1 76066 






JSR 


PCSNPT 


,G0 PRINT SERIAL NUnBER 


2732 


007522 


000004 


015300 






TYPE,L 


H0R3 




2733 


007526 


012737 


007566 


001006 




nov 


ITST001,ilSCPflDR ,SET 'SCOPE' ADDRESS FOR FIRST TEST 


273M 


007534 


01G500 








nov 


R5,R0 




2735 


007536 


062700 


000006 






ROD 


«FC,RO 


/RO CONTAINS ADDRESS OF FC REG 


2736 


007542 


010501 








nov 


R5,R1 





F 6 

DZTUG-B Tn02/TE16 DRIVE FUNCTION TIMER nACYll 30(10H6) 02-DEC-77 09 PAGE 70 SEQ 0070 

CZTUGC Pll 02-OEC- 77 09- H 6 PROGRRfl INITIflLlZflTION 

2737 0075>4>4 062701 000012 ADD HOS.Rl .Rl CONTAINS ADDRESS OF DS REG 

2738 007550 012703 OO^HSO nOV IITlt1ER,R3 ,SET JUMP ADDRESS TO TlflER 

2739 00755H 105737 001130 TSTB diPRGFLG .BRANCH IF NOT SKEH TESTS 
27140 007560 00m02 BEQ TSTOOl 

27m 007562 000137 013326 JHP dUSKEUTST 



G 6 

DZTUG-B Tn02/TE!fe DRIUE FUNCTION TiriER flflCYll 30(10H6) 02-DEC-77 09 ^8 PRGE 71 SEO 0071 

C2TUGC Pll 02-DEC-77 09 STBRT OF TESTS 



27i»2 

27^3 

274^ 

27H5 

27Hb 

27H7 

27^2 

27^9 

2760 

2761 

2762 

2763 

27614 

2766 

2''64> 

2767 

2768 

2769 

27bO 

27b 1 

27bZ 

27b3 

27bM 

27b6 

Z7bb 

Z7b7 

27b8 

27b9 

2770 

2771 

2772 

2773 

277^ 

2776 

277b 

2777 

2778 

2779 

2780 

2781 

2783 
278'* 
2785 
278b 
2787 
2788 
2789 
2790 
2791 
2792 
2793 
279«* 
2796 
279to 
2797 



0076bb 
007671* 
007b00 
007b0'» 
007b0b 
007b 12 
007blb 

007b20 
007b2it 
0C7b2b 

007632 
007b3b 
007bM0 
007bH>* 
007bHb 
007b60 



007b62 
007bb0 
007bbH 

007b70 
007b7'» 

007b7b 
007702 
00770^ 

007710 
0077 m 
00771b 
007-'2,2 

Q0772H 
00772b 



112737 OOOOC, 

012702 007b20 

004 7b7 17663b 
102U20 

00»»7b7 176bl2 

OOt 7b7 17it6it2 
006216 

0067b6 000032 
100002 

0001 b3 00UH60 

00H7b7 176»»00 
102M03 

00M7b7 l7^b^2 
OOOUOl 
lO^MOO 
lOUOOO 



112737 
00««7b7 
012702 
00<4 7b7 
006216 

0067b6 
10U002 
000 lb3 

00H7b7 
102H03 
OOH 7b7 
OOOHOl 

10^'♦00 
10«*000 



00112b 



SBTTL START OF TESTS 
.TEST 001 - WRITE FPOH BOT 

.THIS TEST UILL HERSURE RCCELERRTION DELRY REQUIRED TO 
,nOVE THE TRPE RPPROXinRTELY SEVEN (7) INCHES FORURRO 
.FROn DERO STOP BEFORE STRRTING TO TRRNSFER CRTR 

.THIS TEST tIERSURES TIHE FROtI 'GO'sl TO "flCCL'sO. 



nuuB 


i 1 / vlTSTNUn 


CC T TrCT M 


MAI/ 

nov 


ill. RZ 


•CrT DrTMDkl Of PDAM TlMFD 

/ bt 1 KtlUKN rL r If Un IIFILK 


ICD 


D ^ Drill kin 
PC. KcMIND 


DC IJIklO Ci owe 


Due 




DDQM^U tC CDDAD AM DCLIiun 

/ DKHnCfl Ir tKKUK UN KtMinU 


ICD 


PC UB 1 Tr 


CP TUP uD 1 TP rnnMOMn 


JSR 


PCTItlON 


,TURN TiriER ON 


INC 


(R6) 


,SET 'GO' BIT 


TST 


TC(R5) 


;BRRNCH UHEN 'RCCL'^O 


BPL 


2% 




jnp 


Tit1ER(P3) 


.60 TO TinER & RETURN VIA R2 


JSR 


PC. HfllTRDY 


;MBiT FOR COnnfiND TO FINISH 


BUS 


994 


.BRANCH IF ERROR 


JSR 


PC.TIflOK 


.GO CHECK TIME 


BR 


loot 




HLT 






SCOPE 







000002 00112b 
1765140 
007b7b 
17UHbM 



000032 

00^^50 
175322 
17^5b>4 



IS 



2S 



995 
lOOS 

,TEST 002 - WRITE START 
-THIS TST nEAGURES TIME FROM 
TST002 



'G0'=1 TO 'ACCL'=0 



IS 



2S 



novB 


i2.dtTSTNUn 


SET TEST it 2 


JSR 


PC.URITE 


.INITIATE URITE COMnAND 


nov 


I1S.R2 


.SET RETURN PC FROM TIMER 


JSP 


PC.TinON 




INC 


(R6) 


SET 'GO' BIT 


TST 


TC<R6) 


BRANCH WHEN •ACCL"=0 


BPL 


2S 




jnp 


TinER(R3) 


.GO TO TiriER & RETURN VIA R2 


JSR 


PC. HA 1 TROY 


.WAIT FOR READY 


BVS 


99S 


: BRANCH IF ERROR 


JSR 


PC.TinOK 


-60 CHECK TIME RECORDED 


BR 


100% 


.EXIT VIA SCOPE 


HLT 




.REPORT ERROR 


SCOPE 







99» 
lOOS 



TEST 003- URITE SHUTDOWN 

THIS TEST MEASURES TIME FROM "FC PEG'=0 TO 'SUON'rl 



007730 


112737 


000003 00112b TST003 


MOVE 


•3.ilTSTNUn 


.SET TESTU3 


00773b 


00H7b7 


176Hb: 


JSR 


PC. WRITE 


.INITIATE WRITE COMMAND 


0077H2 


006216 




INC 


(R6) 


.SET 'GO' BIT 


0077HH 


006710 


IS 


TST 


(RO) 


.BRANCH UHEN WRITING FIN 


0077Hb 


001 -tOM 




6EQ 




MONITOR EPPOR B T 


007760 


032711 


0«400Cr 


BIT 


•ERP. (RP 


00776X 


001C17 




BNE 


99S 





DZTUG-B Tn02/TElb DRIUE FUNCTION TIMER 
CZTUGC Pll 02-0iC-77 09 







□Oui'i'Z 














UUr /'bU 






^ou 1 




nnii 7L.7 


1 f H H 




UUf rbH 








UUr rob 


UJZr 1 1 


UUUUZU 




nn777'9 


nni nn7 






nn777ii 


nnni t7 
UUUl b J 




2806 








2807 


010000 


00^767 


176232 


mOUO 


U 1 UUUH 


1 n7um 






ni nnnt. 


nnu7<.7 

UUH ^ Of 


1 7UU 7U 


•.9 1 u 


ni nni ? 


nnnu n 1 

UUUHU 1 




1 1 


fii nni u 


1 nuunn 

1UM1UU 




"91 " 
'SIT 


n 1 nn i 

U 1 UU 1 D 


1 nunnn 

1 UHUUU 




1 ^ 








''91 1 








^9 1 o 


n 1 nn^n 


1 1 ?777 


nnnpnu 

UUUUUH 


991 7 
^0 1 ' 


ni nn7fe 

U 1 UU^D 


UUH 1 Of 


1 7t;777 


791 9 


ni nn77 

U 1 UU 


pnt;7i c; 




791 Q 








7S2n 


D1Q07U 


Gn^7lQ 




2821 




o6i uou 

WW i ' \J~ 




2S22 


ni noun 


□ 72''1 1 

U W^ II 


nunnno 

U~ UU" "U 


2921 


\J 1 uu~~ 


nnin2fe 

UU 1 U^D 




28 2U 


oinnufk 

W 4 WW~ W 


□□□772 

UUU* ■ *m 




292^ 








797fc 


ni nntin 

U 1 UU3U 


□7771 1 


nnnn^n 

UUUUZU 


7977 


ni nni^u 


nni nnu 

UU 1 UUH 




7979 


U I wU30 


□7771 1 


nunnnn 

u~uuuu 


7979 


ninnfi2 


nni ni 7 

UU 1 U I • 




79 in 


ni nnftU 


nnn77i 

UUUr f 1 




79 T1 








7917 


ni nnf>(< 






7977 


ni nntift 


nnu7fe7 

UU~ 1 Of 


1 7U7(>^ 


78 7U 


ninn77 


nin7Q2 

U I Ur w*i 






ni nn7u 

U 1 UU f *t 


n''27i 1 

Uw£ fit 


□□□□2n 

UUUUZU 




mmnn 


nni un2 






ni m n? 


nnni fc7 


UU~ ~ J 










787Q 


nin< n#» 


nnu7f«7 

UU~ f Of 


1 7c;i 2U 

1 r 3 1 


?9un 


ni ni 1 7 


1 U^~ w w 




78U 1 


mm 1 u 


nnu 7^*7 

UU~ r Or 


1 7U 7^^ 

1 ( ~ WWW 


99U7 


mm 20 


nnnum 




78U 7 










mm 22 


1 nuunn 






n 1 m 214 


1 nunnn 












2814 7 








28H8 








28M9 


010126 


112737 


000006 


2850 


01013H 


00««7b7 


176202 


2861 


Olomo 


102^22 




2862 


0101>«2 


00H767 


17627M 


2S63 


Olomb 


012702 


010160 



nocYii 30(l0^6) 

STPRT OF TESTS 



2S 
3t 



H 

02-0EC-77 



6 

09 



US PRGE 72 



4S 



994 

loot 



BR 


It 






PC/ T inoN 


/TURN TmER ON 


nov 


rC> RZ 


' 1 Ann BP Tl IBU B^ PB AM T 1 MPS 

/LORD KtlURN PC rROn TmER 


D 1 T 
D 1 T 


RSDMN/ IK 1 ) 


/BkRNCH UHcN OS <S0hN> SETS 


dNl 


HI 




JHr 




/ uO TO TinER & KtTURN VIH RZ 


JSR 


PCHRITROY 


,WRIT FOR RERDY 


BUS 


994 




JSR 


PCTIHOK 


.GO CHECK TinE RECORDED 


BR 


1004 




HLT 




/REPORT ERROR 


SCOPE 







/TEST OOH - URITE SETTLEOOWN 
,THIS TEST HERSURES TlflE FROM 
TSTOOH 



14 



'SUON'sl TO 'SUON'sQ 



34 



64 



994 
1004 



nous 


«H/d»TSTNUn 


JSR 


PC/ URITE 


INC 


(R6) 


TST 


(RO) 


BEQ 


24 


BIT 


«ERP, (Rn 


BNE 


994 


BR 


14 


BIT 


«SDUN/ (Rl) 


BNE 


34 


BIT 


«ERR/ (Rl) 


BNE 


9<»4 


BR 


24 


JSR 


PC. TinON 


nov 


PC/R2 


BIT 


9S0UN/ (Rl> 


BEQ 


64 


JflP 


TmER(R3) 


JSR 


PC/URITRDY 


BUS 


994 


JSR 


PC/TinOK 


BR 


1004 



;SET 'GO' BIT 

/BRRNCH UHCN URiTiNG FINISHED 
/CHECK ERROR BIT 

/UfliT FOP ASSERTION OF SDMN' 
/HON I TOR ERROR BIT 



/TURN TiriER ON 
/SET RETURN PC FROH TIMER 
BRRNCH UHEN SUDN CLERRS 

•GO TO TIMER K RETURN VIR R2 

-WRIT FOP PERDY 



HLT 
SCOPE 



-TEST 006 - RERD FROM BOT 
/THIS TEST MEASURES TIME FROM 



TST005 



MOVB 

JSR 

BUS 

JSP 
MOV 



«6/aiTSTNUM 
PC/. REUIND 
994 

PC- RERD 
«14/R2 



'G0'=1 TO "RCCL'rO 

-SET TEST »6 
/REUIND SLRVE 

-BRRNCH IF ERROR ON PEUIND 
-SET RETURN PC FROM TIMER 



I b 

D2TUG-B TH02/TElb DRIVE FUNCTION TIMER MflCYll 30(10'4b) 02-DEC-77 09 HS PRGE 73 
C2TUGC Ptl 02-0EC-77 09- «46 STRRT OF TESTS 



SEQ 0073 



285i» 


G1G152 


0014767 


17*4202 




JSR 


PC/TinON 


2855 


0t0l56 


005215 






INC 


(R5) 


285b 














2857 


010160 


005765 


000032 


IS 


TST 


TC(R5) 


2858 


01016*4 


100002 






BPL 


2f 


2859 


010166 


000163 


00*4*450 




JMP 


Tlt1ER(R3) 


28b0 














2861 


010172 


00*4767 


1750*40 


Iff 

2% 


JSR 


PC» hR 1 TRDt 


2862 


010176 


102*403 






BUS 


994 


2863 


010200 


00*4767 


17*4302 




JSR 


PC.TinOK 


28614 


01020H 


OOOMOl 






BR 


loot 


2865 














2866 


010206 


lOHHOO 




99$ 


HLT 




2867 


010210 


lOHOOO 




100$ 


SCOPE 





2868 
28b9 
2870 



,TURN TIMER ON 
,SET 'GO' BIT 

.BRANCH UHEH 'flCCL' RESETS 

;G0 TO TIMER I RETURN VIA R2 

.UfllT FOR READY 
.BRANCH IF ERROR 
.CHECK RECORDED TIME 



.TEST 006 - READ START 

.THIS TEST MEASURES TIME FROM 



2871 


010212 


1 12737 


000006 


OCl 126 


TSTOOb 


MOVB 


ff6.tlfTSTNUM 


2872 


01022G 


00*4767 


175272 






JSR 


PC.WRT. BK 


2873 


01022*4 


102*422 








BUS 


994 


287H 


010226 


00*4767 


176210 






JSR 


PC. READ 


2875 


010232 


012702 


0102*4*4 






MOV 


llt.R2 


2876 


010236 


00*4767 


17*41 16 






JSR 


PC.TIHON 


2877 


0102*42 


005215 








INC 


(R5) 


2878 
















2879 


0102*4*4 


005765 


000032 




IS 


TST 


TC(R5) 


2880 


010250 


1 00002 








BPL 


24 


2881 


010252 


000163 


00*4*460 






JMP 


TinER(R3) 


2882 
















2883 


010256 


00*»767 


17*476*4 




25 


JSR 


PC. HA 1 TROY 


288it 


010262 


102*403 








BUS 


994 


288^ 


01026*4 


00*4767 


17'»216 






JSP 


PC. TIMOK 


2886 


010270 


OOOHOl 








BR 


1004 


2887 
















2888 


010272 


lO^^OO 






99S 


HLT 




2889 


01027H 


10*4000 






lOOS 


SCOPE 




2890 
















2891 










.TEST 


007 - READ SHUTDOUN 


2892 










- THIS 


TEST MEASURES TIME FROM 


2893 


010276 


112737 


000007 


001126 


TST007 


MOVB 


«7.d»TSTNUn 


289H 


01030H 


00H767 


176206 






JSR 


PC.HRT BK 


2896 


010310 


102H30 








BVS 


994 


2896 


010312 


00H767 


17512H 






JSR 


PC. READ 


2897 


010316 


005215 








INC 


(R5) 


2898 














«-FRMCNT (RO) 


2899 


010320 


022710 


OOOHOO 




1% 


CMP 


2900 


01032H 


OOmOM 








BEQ 


2» 


2901 


010326 


032711 


OHOOOO 






BIT 


»ERR. iRl) 


2902 


010332 


001017 








BNE 


994 


2903 


01033H 


000771 








BR 


14 


290H 
















2905 


010336 












PC.TIHON 


2906 


010336 


00*4767 


17^016 






JSR 


2907 


0103H2 


01G702 








MOV 


PC.R2 


2908 


0103*4H 


032711 


000020 






BIT 


SSOUN. (Rl) 


2909 


010350 


001002 








BNE 


34 



■G0"=1 TO 'ACCL'sO 

.SET TEST «6 

;URITE A RECORD 8, BACK SPACE 



.SET RETURN PC FROM TIMER 
.TURN TIMER ON 
.SET 'GO' BIT 

.BRANCH UHEN 'ACCL' RESETS 
.60 TO TIMER & RETURN VIA R2 



FC REG '-FRAME COUNT TO 'SMDN'=1 
,SET TEST 87 

.URITE A RECORD & BACK SPACE 
.BRANCH IF ERROR 

.SET "GO' BIT 

-UAIT FOR FRAME COUNT TO 
.= 8 OF FRAMES URITTEN 
.MONITOR ERROR BIT 



.TURN TIMER ON 

.SET RETURN PC FROM TIMER 

.BRANCH WHEN SOWN SETS 



J b 

DZTUG-B TMOZ/TElb DRIVE FUNCTION TIMER riRCYll 30(1046) 02-DEC-77 09 48 PRGE 7<4 
CZTUGC PU 02-OEC-77 09 46 START OF TESTS 



SEQ 0074 



2910 


010352 


000163 


004450 




JMP 


T IHER (R3) 


2911 














2912 


010356 


004 ttif 


174654 


i% 


JSR 


rC« UH 1 TRDY 


2913 


010362 


102403 






Bl/S 


994 


2914 


010364 


004767 


174116 




JSR 


PCTinOK 


2915 


010370 


000401 






BR 


1004 


2916 














2917 


010372 


104400 




994 


HLT 




2918 


010374 


104000 




lOOS 


SCOPE 





.GO TO TIMER & RETURN UIR R2 



Z919 
2920 
2921 
2922 
2923 
2924 
2925 
2926 
2927 
2928 
2929 
2930 
2931 
2932 
2933 
2934 
2935 
2936 
2937 
2938 
2939 
2940 
2941 
2942 
2943 
2944 
2945 
2946 
2947 
2948 
2949 
2950 
2951 
2952 
2953 
2954 
2955 
2966 
2957 
2968 
2959 
2960 
2961 
2962 
2963 
2964 
2966 



010376 
010404 
010410 
010414 
010416 
010422 

010424 
010426 
010430 
010434 
010436 

010440 
010444 
010446 
010452 
010454 

010456 
010456 
010462 
010470 
010472 

010476 
010502 
010504 
010510 

010512 
010514 



010516 
010624 
010630 
Q1063H 
0106J6 
010642 
010644 
010660 



112737 
012702 
004767 
102436 
004767 
006216 

106711 
100404 
032711 
001026 
000 ""2 

032711 
001004 
032711 
001017 
000771 



004767 
032765 
001402 
000163 

004767 
102403 
004767 
000401 

104400 
104000 



112737 
012702 
00H767 
006216 
00H767 
102422 
00M767 
004767 



000010 
010462 
175102 

175020 



040000 

000020 
040000 



173676 
000020 

004460 

174534 

173776 



001126 



-TEST 010 - REPD SETTLEDOUN 
,THIS TEST MEASURES TIME FROM 



.REPORT ERROR 



'SHDN'=1 TO 'SUDN'sO 



TSTOlO 


novB 


nio.aiTSTNun 


;SET TEST 110 




1 IV V 


tut R2 


/SET RETURN PC FROM TIMER 

/ I Kb 1 W^>^ ■ ^ ■ n V' 1 III lb 1^ 




KB 


PC UOT OK 


yURITE fl RECORD t BACK SPACE 




D VO 










PC READ 






INC 


(R6) 


,SET 'GO' BIT 


14 


TSTB 


(Rl ) 


;UAiT FOR READY 




BMI 


24 


.BRANCH UHEN SET 




BIT 


iFRR. (Rl ) 


/CHECK ERROR BIT 




BNE 


994 






BR 


14 




24 


BIT 


«SDUN, (Rl ) 


;WAIT FOR ASSERTION OF 'SDUN 




BNE 


34 






BIT 


lERR' (Rl) 


/MONITOR ERROR BIT 




BNE 


994 






BR 


24 




34 










JSR 


PCTIMCN 


-TURN TiMFP ON 


44 


BIT 


•SOUN. DS(R6) 


/UAIT FOR NEGATION OF SDUN 




BEQ 


64 






JMP 


TinER(R3) 


/GO TO TIMER I RETURN VIA R2 


54 


JSR 


PCHfilTROY 






BUS 


994 






JSR 


PCTIMOK 






BR 


1004 




994 


HLT 






1004 


SCOPE 







/TEST 011-REAO REt/ERSE START 

;THIS TEST MEASURES TIME FROM 'G0'=1 TO 'ACCL'=0 



000011 001126 


TSTOU MOVE 


•ll/JITSTNUM 


010562 


MOV 


tl4/R2 


174670 


JSR 


PC/WRITE 




INC 


(R5) 


174H74 


JSR 


PC/UAITRDY 




BUS 


994 


174174 


JSR 


PC. DELAY 


174704 


JSR 


"CREVRD 



/SET RETURN PC FROM TIMER 
.URITE A RECORD 
.SET 'GO' BIT 



.UAIT FOR TAPE MOTION TO STOP 



K 6 

D2TUG-B TMOZ/TElb DRIVE FUNCTION TiriER HPCYll 30(10Mb) 02-DEC-77 09 48 PRGE 
C2TUGC Pll 02-DEC-77 09. Mfe STORT OF TESTS 



29&b 


01055>< 


004767 


173600 






JSR 


PC, TinON 


29b7 


010560 


006215 








INC 


(R6) 


2968 
















2969 


010662 


006766 


000032 




IS 


TST 


TC(R5) 


2970 


010566 


100002 








BPL 


25 


2971 


010670 


000163 


004460 






jrip 


TIMER(R3) 


2972 
















2973 


01057M 


004767 


174436 




2S 


JSR 


PCWfllTRDY 


297«4 


010600 


102403 








BVS 


995 


297B 


010602 


004767 


173700 






JSR 


PC. TIHOK 


2976 


0106C6 


000401 








BR 


1005 


Z977 
















2978 


010610 


104400 






995. 


HLT 




2979 


010612 


104000 






lOOS 


SCOPE 




2980 
















2981 










;TEST 


012-REflD 


REVERSE SHUTDOUN 


2932 










.THIS 


TEST riERSURES TIME FROM 'FC REG' 


2983 


0106m 


1 12737 


000012 


001 126 


TST012: nOWB 


tl2, aiTSTNUM 


298'* 


0106ZZ 


01Z70Z 


□10b7Z 






nov 


*35. R2 


2985 


010626 


Anil ^ 

004767 


174672 






JSR 


PC/URITE 


2986 


010632 


006215 








INC 


(R6) 


2987 


010634 


004767 


1 74376 






JSR 


PC/UniTRDY 


a988 


□10640 


102427 








D VO 


995 


2989 


010642 


004767 


174bl2 






JSR 




Z990 


OiOdHd 


□OsZlb 








INC 


(R6) 


299 1 
















2992 


010690 


□ZZ710 


nrmii no 




IS 


CMP 


t-FRMCNT, (RO) 


2993 


010654 


001404 








BEQ 


25 


299M 


010666 


03271 1 


nil nnnn 






BIT 


lERR. (Rl) 


299^ 


010662 


001016 








BNE 


995 


2996 


010664 


000771 








BR 


15 


2997 
















2998 


010666 








2S 






2999 


010666 


004^67 


1 73466 






JSR 


PC.TinON 


3000 


010672 


032<' 1 1 


□ooozo 




35 


BIT 


tSOUN. (Rl) 


3001 


010676 


nn « nn i 

OOIOOZ 








BNE 


45 


3002 


010700 


000163 


004 4 bU 






JHP 


TinER(R3) 


3003 














300H 


010704 


004767 


1 714 3Z6 




45 


JSR 


PC.UfllTRDY 


3005 


010710 


102403 








BVS 


995 


3006 


010712 


004767 


173570 






JSR 


PC, TinOK 


3007 


010716 


0Q0401 








BR 


1005 


3008 
















3009 


010720 


104400 






995- 


HLT 




3010 


010722 


104000 






1005 


SCOPE 




301 1 
















3012 










,TEST 


013-REOO 


REVERSE SETTLEDOWN 


3013 










,THIS 


TEST riERSURES TIME FROM *SDUN' = 1 


3011 


010724 


1 12737 


000013 


001 126 


TST013 nOVB 


»l3,ilTSTNUn 


JDl9 




UI 


mime 






nov 


«45,R2 


3016 


010736 


004767 


174462 






JSR 


PC, WRITE 


3017 


0107H2 


006216 








INC 


(R6) 


3018 


0107H4 


00H767 


174266 






JSR 


PCURITROY 


3019 


010760 


102436 








BVS 


995 


3020 


010762 


004767 


17H602 






JSR 


PCREVRD 


3021 


010766 


006215 








INC 


(R5) 



75 



SEQ 0075 



,TURN TIMER ON 
;SET 'GO' BIT 

/BRRNCH UHEN 'RCCL' = 0 

;G0 TO TIMER & RETURN VIR R2 

,BRRNCH IF ERROR 



= FRRME COUNT TO 'SDWN'=1 

;SE'I RETURN PC FROM TIMER 
;URiTE R RECORD 
,SET 'GO' BIT 



;SET 'GO' BIT 

;BRRNCH UriEN FRRME COUNT 

;= « OF RECORD URITTEN 

; MONITOR ERROR BIT IN 'OS' REG 



,TURN TIMER ON 
,6RRNCH UHEN SDUN SETS 

;G0 TO TIMER & RETURN VIR R2 

,URIT FOR RERDY 



TO 'SDUN'sO 

,SET RETURN PC FROM TIMER 
,URITE R RECORD 
,SET 'GO' BIT 



,SET 'GO' BIT 



D2TUG-B Tt102/TElb DRIVE 
C2TUGC Pll 02-0EC-77 



FUNCTION TIMER 
09: Hb 



I 6 

MflCYll 30(1046) 02-0EC-77 09 PAGE ?b 
STORT OF TESTS 



SEQ 0076 



3022 








3023 


010760 


106711 




3024 


010762 


100404 




302B 


010764 


032711 


040000 


3026 


010770 


001026 




3027 


010772 


000772 




3028 








3029 


010774 


032711 


000020 


3030 


011000 


001004 




3031 


011002 


032711 


040000 


3032 


011006 


001016 




3033 


011010 


000771 




3034 








303S 


011012 






3036 


011012 


004767 


173342 


3037 


011016 


032711 


000020 


3038 


011022 


001402 




3039 


011024 


000163 


004450 


3040 








3041 


011030 


004767 


174202 


3042 


011034 


102403 




3043 


011036 


004767 


173444 


3044 


011042 


000401 




3045 








3046 


011044 


104400 




3047 


011046 


104000 




3048 








3049 








30B0 


011050 






3051 


011050 


004767 


174266 


3052 


011054 


102401 




3053 


011056 


102002 




3054 


011060 


104400 




3055 


011062 


000772 




3056 


011064 






3057 








3058 








3059 








3060 


011064 


112737 


000014 


3061 


011072 


012702 


011124 


306Z 


011076 


004767 


174322 


3063 


011102 


006216 




3064 


011104 


004767 


174126 


3065 


011110 


102420 




3066 








3067 


011112 


004767 


174342 


3068 


011116 


004767 


173236 


3069 


011122 


006216 




3070 








3071 


0\\\2H 


006766 


000032 


3072 


011130 


100002 




3073 


011132 


000163 


004450 


3074 








3076 


011136 


004767 


174074 


3076 


011142 


102403 




3077 


011144 


004767 


173336 



IS 


TSTB 


(R1) 


; BRANCH UHEN 




BMI 


2S 


, READY SETS 




BIT 


»ERR, (Rl) 






RNF 

D Ilk. 








BR 


IS 




2S 


BIT 


ISDUN, (Rl) 






BNE 


3S 






BIT 


•ERR, (Rl) 






one 


99% 






BR 


2S 




3S 










JSR 


PC/TIMON 


,TURN TIMER ON 


4%- 


BIT 


iSDUN/ (Rl) 


; BRANCH UHEN SUDN : 0 




BEQ 


5S 






JMP 


TinER(R3) 


;G0 TO TIMER & RETURN VIA R2 


5S 


JSR 


PCHBITRDY 


;UAiT FOR READY 




BVS 


99S 






JSR 


PC.TmOK 






BR 


lOOS 




99S 


HLT 






IOCS 


SCOPE 






.REUIND DRIVE 






H 


JSR 


PC/. REUIND 


;REUtN0 SLAVE 




BVS 


99S 


/'BRANCH IF ERROR ON REUINO 




BVC 


100S 




99S 


HLT 








BR 






lOOS 








,TEST 


014-TURN 


AROUND DELAY (FORUARD- 


-REVERSE) 


, THIS 


TEST MEASURES TIME FROM 'G0'=1 


(READ REVERSE) TO •ACCL'=0 


TST014 


novB 


«14,aiTSTNUM 






MOV 


I2S,R2 


;SET RETURN PC FROM TIMER 




JSR 


PCURITE 


/URITE A RECORD 




INC 


(R6) 


,SET 'GO' BIT 




JSR 


PCUAITRDY 






BVS 


99S 




IS 


JSR 


PCREVRO 


;READ THE RECORD (REVERSE) 


JSR 


PC/TIMON 


. TURN T IMER ON 




INC 


(R6) 


/SET GO BIT 


2S 


TST 


TC(R5) 


/UAIT FOR 'ACCL* = 0 




BPL 


3S 


/GO TO TIMER i RETURN VIA R2 




JMP 


TmER(R3) 


3S 


JSR 


PCUAITRDY 






BVS 


99S 






JSR 


PC, TinOK 





DZTUG-B TH02/TElb DRIVE FUNCTION TIMER 
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tIflCYll 30(10Hb) 
START OF TESTS 



02-0EC-77 



6 

09 H8 
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SEQ 0077 



3078 


01U50 


000401 








BR 


loot 




3079 


















3080 


011152 


10M400 






995 


HLT 






3081 


01115M 


lOMOOO 






loot: 


SCOPE 






3082 


















3083 










.TEST 


015- TURN 


AROUND DELAY (REVERSE 


-FORUARD) 


308M 










>THIS 


TEST flEflSURES TlflE FROH 'GO'sl 


(READ) TO 'ACCL'^O 


3085 


011156 


112737 


000015 


001126 


TST015: nOVB 


llS.dlTSTNUn 




3086 


01116M 


012702 


011232 






nov 


l2t,R2 


;SET RETURN PC FROM TIMER 


3087 


011170 


00H767 


174230 






JSR 


PCURITE 


;URITE A RECORD 


3088 


01117H 


005215 








INC 


(R5) 


;SET 'GO' BIT 


3089 


011176 


00M767 


174034 






JSR 


PC, MAI TROY 


;UAIT FOR READY 


3090 


011202 


102H26 








BVS 


99t 




3091 


01120H 


00M767 


174250 






JSR 


PCREVRD 


.READ A RECORD IN THE 


3092 


011210 


005215 








INC 


(R5) 


;SET 'GO' BIT 


3093 


















309H 


011212 


00M767 


174020 






JSR 


PC.UAITRDY 




3095 


011216 


102M20 








BUS 


99t 




3096 


















3097 


011220 


004767 


174216 




IS 


JSR 


PC/ READ 


;READ RECORD FORUARD 


3098 


oii;:2M 


004767 


173130 






JSR 


PC. TltlON 


.TURN TIMER ON 


3099 


011230 


005215 








INC 


(R5) 


;SET 'GO' BIT 


3100 


















3101 


011232 


005765 


000032 




2S 


TST 


TC(R5) 


;HAIT FOR 'ACCL' = 0 


3102 


011236 


100002 








BPL 


3t 




3103 


0112H0 


000163 


004450 






jnp 


TmER(R3) 


;G0 TO TIMER & RETURN VIA R2 


310H 


















3105 


0112HH 


00M767 


17376b 




35 


JSR 


PC. tip TSOv 




3106 


011250 


102403 








BVS 


99t 




3107 


011252 


004767 


173230 






JSR 


PC.TinOK 




3! 08 


011256 


000401 








BR 


loot 




3109 


















3110 


011260 


104400 






995. 


HLT 






3111 


011262 


104000 






lOOS. 


SCOPE 






3112 


















3113 










,TEST 


01 6- GAP SIZE (STOP HALF) 




3im 


01126H 


112737 


000016 


001126 


TST016 nOVB 


ll6.dtTSTNUt1 




3115 


011272 


012702 


011330 






nov 


llt.R2 


;SET RETURN PC FROM TIMER 


3116 


011276 


004767 


174122 






JSR 


PC.URITE 


.URITE A RECORD 


7117 


ni 1 7(19 










INC 


(R5) 


.SET 'GO* BIT 


3118 


01130H 


004767 


173726 






JSR 


PC.UAITROY 




3119 


011310 


102421 








BVS 


99t 




3120 


011312 


004767 


173426 






JSR 


PC. DELAY 


.DELAY 350 MS 


71 91 


m 1 71 c 

UI 1 U 1 D 




1 7U 1 7(k 






JSR 


PC.REURO 


.-READ ItEVERSE RECORD 


3122 


011322 


004767 


173032 






JSR 


PC.TinON 


.TURN TIMER ON 


3123 


011326 


006215 








INC 


(R5) 


.SET GO BIT 


31 2H 
3125 


011330 


005710 






IS 


TST 


(RO) 


;UAIT FOR FRAME COUNT > 0 


3126 


011332 


001002 








BNE 


2t 


f^A TA T 1 MFD t DCTIIDkl II 1 O DO 

. u(7 TO TIMtR & KcTUKN VIH 


3127 


01133H 


000163 


004450 






jnp 


TmER(R3) 


3128 
3129 


01131*0 


004767 


173672 






JSR 


PC. HA 1 TROY 


.UAIT FOR READY BIT TO SET 


3130 


OIUHH 


102403 








BVS 


99t 


.CHECK TIME 


3131 


0113H6 


004767 


173134 






JSR 


PC.TItlOK 


3132 


011362 


000401 








BR 


loot 




3133 



















D2TUG-B TH02/TElb DRIVE 
C2TUGC Pn 02-0EC-77 



31 3^ 
3136 
3136 
3137 
3138 
3139 

3mo 

3im 
3142 

3m3 
3lH^ 

31H5 
31'*b 

sm? 

31'*8 
3l<*9 
31 BO 
3151 
3162 
3163 
31 6H 
3166 
3166 
3167 
3168 
3169 
3160 
3161 
3162 
3163 
316H 
3166 
3166 
3167 
3168 
3169 
3170 
3171 
3172 
3173 
31 7H 
3176 
3176 
3177 
3178 
3179 
3180 
3181 
3182 
3183 
31 8H 
3186 
3186 
3187 
3188 
3189 



FUNCTION TinER nflCYll 30(10H6) 
09: H6 START OF TESTS 



N 

02-DEC-77 



6 

09: tS 



011354 


104400 




99%. 


HLT 




011366 


104000 




loot. 


SCOPE 










;TEST 


01 7- GPP 


SIZE (START HRLF) 


011360 


112737 


000017 001126 


TST017 


nouB 


»l7,atTSTNUn 


011366 


012702 


011440 




MOV 


lllf,R2 


011372 


004767 


174026 




JSR 


PC.URITE 


011376 


006216 






INC 


(R6) 


01 moo 


004767 


173632 




JSR 


PCURITRDY 


oimoM 


102427 






BUS 


99» 


oimo6 


004767 


174046 




JSR 


PCREVRD 


oiim2 


OObZlb 






INC 


/ DC \ 


oimm 


004767 


173616 




JSR 


PCUfllTRDY 


011420 


102421 






BUS 


99» 


011422 


004767 


173316 




JSR 


PC, DELAY 


01 1426 


004767 


1 74Uin 




ICD 


ry.) KtHU 


011432 


004767 


172722 




JSR 


PC.TinON 


011436 


006216 






INC 


(R6) 


011440 


006710 




IS 


TST 


(RO) 


□ 1 1442 


□□lUUZ 






DriL 


2S 


C11444 


000163 


004 4 BO 




JHP 


TinER(R3) 


011460 


004767 


173662 


25 


JSR 


PCUfllTROY 


011464 


102403 






BVS 


994 


011466 


004767 


173024 




JSR 


PC.TItlOK 


011462 


000401 






BR 


lOOS 


011H6H 


104400 




99S: 


HLT 




011466 


104000 




lOOS 


SCOPE 





011470 
011476 
011602 
011606 
011610 
011614 
011616 
011622 
011624 
011630 
011632 
011636 
011640 
011544 
011646 
011662 
011666 

011660 
011662 
011664 



112737 
012702 
004767 
006216 
004767 
102433 
004767 
006216 
004767 
102426 
004767 
006216 
004767 
102417 
004767 
004767 
006216 

006710 
001002 
000 163 



011670 004767 



000020 001126 

011660 

173716 

173522 

173702 

173606 

173722 

173472 

173706 
172602 



004450 
173442 



.TEST 020- GAP SIZE ( INTERRECORO) 
,THIS TEST MEASURES TIHE FROfl 'GO 

TST020 nOVB «20.aiTSTNUn 

nOV ilf,R2 

JSR PCURITE 

INC (R6) 

JSR PC, WA I TROY 

BVS 99S 

• JSR PC. WRITE 

INC (R6) 

JSR PC, UA I TROY 

BVS 99* 

JSR PCREVRD 

INC (R6) 

JSR PCUAITRDY 

BVS 99S 

JSR PCREVRD 

JSR PC, T I HON 

INC (R6) 

IS TST (RO) 

BNE 2S 

JtlP TinER(R3) 

2S JSR PCUAITRDY 
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SEQ 0078 



;SET RETURN PC FROM TIMER 
;URITE A RECORD 
;SET 'GO' BIT 
;UAIT FOR READY 

;READ REVERSE THE RECORD 

;SET 'GO' BIT 

,UAIT FOR READY 

, BRANCH ON ERROR 

;WAIT FOR TAPE MOTION TO STOP 

;READ RECORD 

,TURN TIMER ON 

,SET 'GO' BIT 

;UAiT FOR FRAME COUNT > 0 

;G0 TO TIMER I RETURN VIA R2 

,WAIT FOR READY 

; CHECK TIME 



=1 TO "FC REG' ^O 

,SET RETURN PC FROM TIMER 
,URtTE A RECORD 
;SET 'GO' BIT 
;UAIT FOR READY 

,URITE SECOND RECORD 
,SET 'GO' BIT 
,UAIT FOR READY 

;READ REVERSE SECOND RECORD 
,SET 'GO' BIT 
;UAIT FOR READY 

;READ REVERSE FIRST RECORD 
,TURN TIMER ON 
;SET 'GO' BIT 

,MAIT FOR FRAME COUNT > 0 

,G0 TO TIMER I RETURN VIA R2 

,WfllT FOR READY 
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3190 

3191 

319£ 

3193 

319H 

31 96 

Zi9b 

3197 

3198 

3199 

3200 

3201 

3202 

3203 

320H 

3205 

3206 

3207 

3208 

3209 

3210 

3211 

3212 

3213 

321 H 

3216 

3216 

3217 

3218 

3219 

3220 

3221 

3222 

3223 

Z22H 

3226 

3226 

3227 

3228 

3229 

3230 

3231 

3232 

3233 

323H 

3236 

3236 

3237 

3238 

3239 

3240 

32m 

32<42 

32H3 

324H 

3245 



011574 
011576 
011602 

01160H 
011606 



011610 
011616 
011622 
011626 
011630 
011634 
011640 
011644 
011646 
011652 
011654 
011660 
011666 
011670 

011672 
011676 
011702 
011704 
011710 
011712 
011714 

011716 
011722 
011726 
011732 

011734 
011740 
011742 
011746 
011762 

011764 
011760 
011762 



102403 

004767 172704 
000401 

104400 
lOUOOO 



U2737 
CI 2702 
004767 
102630 
006067 
012700 
004767 
005216 
004767 
102616 
004767 
062767 
006300 
001363 

012700 
004767 
005216 
004767 
102477 
006300 
001370 

012700 
012701 
004767 
006216 

004767 
102463 
004767 
004767 
006216 

005766 
001002 
000163 



000021 
011754 
173514 

167264 
000021 
173560 

173364 

173114 
000022 



000021 
173666 

173326 



000020 
001060 
173610 



173276 

173474 
172406 



000006 
004460 



167232 



994. 
100S 



BVS 
JSR 
BR 

HLT 
SCOPE 



99i 

PCTinOK 
lOOS 



,TEST 021- GRP CONSISTRNCY 

,TH»S TEST MEflSUkES TltlE FROH 'GO'sl TO 'FC REG' > 0 
,THE TEST REUINDS THE TfiPE, WRITES 17 RECORDS WITH fl DELAY FROM 1-16 OS 
, BETWEEN EOCH WRITE COnHfiNO. AFTER THE 17. RECORDS ARE WRITTTEN THE 
.PROGRAM READ REVERSES 16 RECORDS. AT THIS POINT THE TAPE IS STOPPED BE- 
,TWEEN THE FIRST AND SECOND RECORD. A READ COnnAND IS EXECUTED TO READ 
.THE 16 RECORDS WITH THE TIME BETEWEN 60=1 TO FC > 0 STORED IN 'GAPTBL' 
,F0R EACH RECORD READ. AFTER 16 RECORDS HAVE BEEN READ THE TIME IS VER- 
. IFIEO FOR EACH READ. AFTER ALL RECORD TIMES ARE VERIFIED THEY ARE AVER- 
,AGED AND PLACED IN THE 'RTinVBL' (BY SCOPE). THE ABOVE PROCESS IS RE- 
CREATED FOR EACH ITERATION. 



001126 TST021: 



IS 



2S 



34 



44 



novB 


ff2l,dlTSTNUn 


nov 


ff44.R2 




Of oruiijn 


BVS 


994 


CLR 


DELTin 


nov 


i17. ,RQ 


JSR 


PC, WRITE 


INC 


(R6) 


■ CD 




BVS 


994 


JSR 


PCDELAYU 


ADD 


918 .DCLTin 


DEC 


RO 


BNE 


14 


nov 


117. .RO 


JSR 


PC.REVRD 


INC 


(R5) 


JSR 


PC.WAITRDY 


BVS 


994 


DEC 


RO 


BNE 


24 


nov 


»16 .PO 


nov 


SGAPTBL.Rl 


JSR 


PC, READ 


INC 


(R5) 


JSR 


PCWAITROY 


BVS 


994 


JSR 


PC. READ 


JSR 


PC.TinON 


INC 


(R6) 


TST 


FC(R5) 


BNE 


54 


JhP 


TinER(R3) 



,SET RETURN PC FROM TIMER 
; REWIND SLAVE 

; BRANCH IF ERROR ON REWIND 
; CLEAR VARIABLE DELAY TIME 
;SET ff OF RECORDS TO WRITE 
; WRITE 17. RECORDS 
;SET 'GO' BIT 
.WAIT FOR READY 

; DELAY BEFORE WRITING NEXT REC 

;SET NEXT DELAY TIME 

.DECREMENT RECORDS WRITTEN COUNT 



.SET 9 OF RECS TO REVERSE READ 
.-REVERSE READ 17 RECORDS 
;SET 'GO' BIT 
.WAIT FOR READY 

DECREMENT RECORD COUNT 



.SET ; OF RECORDS TO READ 
.SET PTR TO GAP TABLE FOR TEST 
.READ A RECORD 
.SET 'GO' BIT 

;UAIT FOR READY 

.READ NEXT RECORD 
.TURN TIMER ON 
.SET 'GO' BIT 

.WAIT FOR FRAME COUNT > 0 

.GO TO TIMER I RETURN VIA P2 
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7911 










Ul I r Ob 


UUH f Of 


1 77911U 




nil 777 


1 n7uiic. 

1 U^HHO 






ni i 77U 


n 1 nu 7 1 






ni i 77<« 


nnK7nn 






Ul ^uuu 


nni Tcc 

UU 1 j99 














ni 7nn9 


1 ncn77 


nni 1 9u 

UU 1 1 ^"v 




ni 7nnfe 


ni 77nn 


nnnn7n 

UUUU^U 




ni 7ni 7 


01 2701 


OQIOfiO 

UU 1 UwU 


7'?tfc 










ni 7ni (> 


ni 71 nu 

w 1 ^ 1 U^ 






ni 7n7n 


nnu7fc7 

UU * r D f 


172572 




ni2Q2U 


1 0^237 


001 12*4 

WW I 1 » 


72(tn 


ni 2030 


1 22737 


000020 

WWWWAbW 


77f>1 




WU 1 WW* 














01 20U0 


012700 


000020 

W W V W AaW 


77fcU 


ni 2nuu 


01 2701 


001G60 

UW 1 wWU 


77*. <i 




005002 








005003 








062102 




w W V 




006603 




1269 


012060 


006300 

WW WW WW 




3270 


012062 


001 Z7H 




3271 


0120bt 


01270G 


00000*4 


3272 


012070 


006203 




3273 


012072 


006002 

W WWWWa> 




327H 


01207U 


006300 

WW W WW w 




3275 


012076 


00137*1 




3276 


012100 


01020*4 




3277 


012102 


00*4767 


1 72*400 


3278 


01 2106 


000*401 

WWW^ W i 




3279 








3280 


0121 10 


10<4H00 




3281 


012112 


10*4000 

• w ■ www 






























01 21 lU 


1 12737 


000022 

WW WW •••• 




























012122 


1 12737 


000023 

\^ww w w 




0121 30 


012702 


012202 


1291 


0121311 


00H767 


173202 


3292 


0121H0 


102H37 




3293 


012142 


00*4367 


173*412 




0121*46 


016*420 




3296 


012160 


1763H0 




3296 


012162 


17H700 




3297 


01216H 


000060 




3298 


012166 


006216 




3299 








3300 


012160 


022710 


174700 


3301 


0l216it 


001 OOH 





nnCYll 30(1046) 
START OF TESTS 



56 



02-DEC-77 



7 

09 *48 



PI 



6% 



001 12*" 



7S 



8S 





PC UQITBOY 


BUS 


996 


MOV 


R4, (RD* 






one 


•J » 






MOV 


116. ,R0 


MOV 


iCflPTBL/Rt 


MOU 


(R1 )f < R*4 


JSR 

w w•^ 


PC/ GflPOK 


INCB 


dIGflP 


CMPB 


• 16 < AIGflP 


BNE 


66 


MOV 


1116. ' RO 


MOV 


XGRPTBL. R1 


CLR 


R2 


CLR 


R3 


noD 


(Rl )'^/ R2 


RDC 


R3 


DEC 


RO 


BNE 


74 


MOV 


114, RO 


flSR 


R3 


ROR 


R2 


DEC 


RO 


BNE 


86 


MOV 


R2,R4 


JSR 


PCTIMOK 


BR 


1006 


HLT 




SCOPE 





996. 
1006. 

,TEST 022-OUMMY TEST 

,THIS TEST MEASURES NOTHING 

TST022- nOVB l22,dlTSTNUn 

,TEST 023-DflTfl TIME (200BPI) 

/THIS TEST MEASURES TIME FROM "FC RE 

TST023 MOVB «23/ilTSTNUn 

MOV 136/ R 2 

JSR PC/. REMIND 

BVS 9?6 

JSR R3, TMCMD 

. UORD UTBUF 

. UORD -800 

.UORD -1600 
UORD UFUD 

INC (R6) 

IS CMP S-1600 / (RO) 

BNE 26 



80 



SEQ 0080 



;UfllT FOR READY 

/STORE TIME IN GflPTBL 

; DECREMENT « OF RECORDS READ 

/SET GAP 11 0 



GET GAP TICK COUNT 
CHECK TIME 
INCREMENT GAP II 

BRANCH IF ALL GAPS NOT CHECKED 



; SETUP TO AVERAGE GAP SIZES 

;SET PTR TO TABLE 

; CLEAR 'SUM' REGISTERS 

;A00 ALL GAP SIZES TOGETHER 



;NOU DIVIDE BY 16. 

/BY SHIFTING 4 PLACES RIGHT 



/MOVE AVERAGED TIMES TO R4 
/CHECK AVERAGED TIMES 



CHANGES TO -RDY'sl 

/SET RETURN PC FROM TIMER 
/REUINO SLAVE 

: BRANCH IF ERROR ON REUIND 
;URITE 800 UORD RECORD 
;SET URITE BUFFER ADDRESS 
;UORD COUNT 
, FRAME COUNT 
;UR!TF. COMMAND 
/SET 'GO' BIT 

/UP IT FOP FRAME COUNT TO CHANGE 
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SEQ Q08\ 



7 


01 Zlob 


n707 4 4 

03Z71 1 


nil nnnn 
040000 






O 1 T 

0 1 T 


lERRf (Kl ) 


MnkJ 1 TAD CDDAD DIT 

/nONITOR lRkOk bit 




n 1 ^1 7^ 
ulZl rZ 


nm 

OOlOZZ 








BNt 








QlZl/H 


000r71 








OK 


11 




33Qb 




















n 1 0 1 7£. 

ulZl 7b 








9C 

Zs 










ni 91 

OlZl f D 


nmi7C7 
OOH r b 7 


1 79 1 cc 

1 rZlbb 










/ 1 UKn 1 1 ntK UN 


7 TOO 


□IZZuZ 


1 nc 711 






7ft 


TCTO 


f B 1 1 


UQ 1 T CnD DCOnV TA CCT 
/HHII rUK KtHUT lU St I 




m 99nii 
01 ZZOH 


1 nniin9 
1 UOHOZ 








QM 1 

on 1 


Ml 






ni 99n£. 
0 1 ZZOb 


nnni £.7 
000 ibi 


nnuiicn 






IHD 

jnr 


T 1 MTD r D 7 ^ 

1 1 nbK (K3 ) 


■ ftn Tn ''IMPD 1 DrTllDM l( 1 Q D9 


7 711 

331 t 


OIZZIZ 


ni ^7nn 
01Z70U 


nnnnn 7 
000003 






nou 


M 7 Dn 
K3/ RU 


crT Tn n itf 1 nr bv ff 

/ dL 1 1 U U 1 U 1 UL D T O 


771 7 


ni 991 c 

U1 ZZ 1 b 


nn<>9nii 
UUbZUH 












■ Rv suirTiMfi PI RUT 7 PI orrc 


771 7 


ni 999n 
UiZZZU 


nnc7nn 










on 

KU 




7 71 U 


n 1 9999 


nni 77C 

UUl 3r 3 








Drit 


9 > 




771 C 


m 999b 
Ul zzzt 


UUHrbr 


1 7 7nnt. 
1 r dUUb 






ICS 


r L / Htl 1 1 K U T 




771 1 


m 99 7n 
Ul ZZ3U 


1 n9iin7 








D V 3 


77» 






ni 9979 


nnii7^7 


1 799Cn 

1 f ZZbU 






ICD 


or T 1 HnK 

r L / 11 \\\if\ 




7 7 1 O 


n 1 7t 
U1 ^Z3b 


nnniim 
UUU4U1 








QD 


1 nnc 

1 UU9 




771 Q 


















777n 


OIZZHU 


1 nil linn 








Ul T 

riL 1 






7 7^ 1 

33ZI 


ni 991l9 


1 niinnn 
lUHUUU 






1 nm. 
lUUs: 








JJZZ 


















7797 










TF9T 


ij4a7 1 ri 


1 MIC V33wDr 1 / 




777U 
u J^*1 


ni 991111 


1 1 7777 


nnnn9b 






■ MHUR 

1 Iv vD 


11 A~ ' w 1 w 1 nwi 1 






ni 99t9 


ni 97(19 


ni 9779 






1 IV V 


ff7C, 02 


;SCT RETURN PC FROM TIMER 






ni1U7(>7 
UU*f f Of 


1 7 '{nfiH 

1 ■ ^UDU 






JSR 


PC. RFUIND 


; REUIND SLflUE 


7797 


ni 99fc9 


1 n9bu 9 








W V J 


99% 


; BRANCH IF ERROR ON REUIND 


777R 


ni 99f<U 

U 1 ^^D7 




nnn7nn 

uuu f uu 


LJ W 1— -J u 




B 1 S 


IBP 1556-t'NORfll ^ . TC (R5) 


;LOflD TOPE CONTROL REGISTER 


7790 


ni 9979 


nnu 7<«7 


1 7 79fc'7 








R3. TMCHO 


;URITE 2224 UORD RECORD 


777n 


ni 997t 
UlZZr b 


ni t>ii9n 










UTBUr 




7771 


n 1 9 7nn 

U 1 Z3UU 


1 77C9n 










-22214 




7779 


ni 97n9 
Ul ajUZ 


1 <>79lin 
I br ^MU 










-nuns 




7777 
J J J J 


ni 97nu 

U 1 ^«jU7 


nnnntn 








UORD 


UFUD 




777U 


n 1 9 7nfc 










INC 


(R5) 


-SET 'GO' BIT 


777ti 


















777t 


ni 971 n 


n997i n 


1 Df 




1 % 

1 9 


CMP 


ft-4448 , ( RO ) 


^BRRNCH UHEN WRITING BEGINS 


7777 


n 1 ^7 7 1 ii 


nn 1 nnii 








DriL 






777Q 


ni 971 c 


n797i 1 


nunnnn 






R 1 T 
D 1 1 


*ERR. (RI ) 


/MONITOR ERROR BIT 


777Q 


ni 9799 

U1Z3ZZ 


mi n99 
UuiUZZ 








RNF 
Dnt 


773 






ni 979U 


nnn77i 

UUUr r 1 








BR 


1% 




7 7U 1 


















7 711'? 


m 9 79<. 

U I ^J^b 








9% 






. TURN T IMER ON 


7 7li 7 


ni 979<. 

Ul ^j^b 


nnu7<.7 

UUHr Of 


1 79n9f. 






il on 


PC , T ItlON 


7711 li 
3JH4 


ni 9779 


1 nc7i 1 

1 Ub r 1 1 








TSTB 


( Rt ) 


.BPRNCH UHEN READY SETS 




n 1 9 7 7U 


1 nniin9 








RM 1 

Dill 


4S 


/GO TO TIMER & RETUPN VIA Ri 


77UC 
33HO 


n 1 9 7 7t 
Ul Z33b 


nnni c7 
uuu 1 b J 


nniiiicn 

UUHf 9U 






IMP 


T lflER(R3) 

III lb l\ S l\ w ' 


7711 7 

33Hr 
















-SET SHIFT COUNT 


7 7liO 


n 1 9 7U 9 


ni 97nn 
UI uu 


nnnnn 7 

UUUUUU 




7 9 


1 IV V 


13. PO 


77UQ 
jjt 7 


ni 77Uf> 

U 1 ^W7D 


UUD^U7 






5S 


PSR 


R4 




77Cn 


ni 97iin 


nnc7nn 








DEC 


RO 




I 


□12362 


001375 








SHE 


5$ 




3362 


01235H 


00^767 


172656 






JSR 


PCUfllTRDY 




3353 


Ql23b0 


102H03 








BUS 


99t 


, CHECK TIME 


336H 


612362 


00«»767 


172120 






JSR 


PCTinOK 


336S 


012366 


OOC^Ol 








BR 


lOOS 




3366 












HLT 






3357 


012370 


10^^00 






995 







I 7 

DZTUG-B THOZ/TElb DRIVE FUNCTION TIHER nflCYU 30(10U6) 02-DEC-77 09: i«8 PAGE 82 SEQ 0082 

C2TUGC Pn 02-DEC-77 09 Hb START OF TESTS 



3368 


012372 


1 OH 000 






lOOS 


SCOPE 






3369 


















3360 










. TEST 


026-DnTR 


TinE (800BPI) 




3361 


01237«» 


112737 


000026 


001126 


TST025 


nouB 


1026. aiTSTNUn 




3362 


012H02 


012702 


012H62 






nov 


I3f/R2 


/SET RETURN PC FROfI TinER 


3363 


012H06 


00H767 


172730 






JSR 


PC/ . REUIND 


/REUIND SLAVE 


336>« 


012m2 


102*4H2 








BVS 


99S 


/BRANCH IF ERROR ON REUIND 


3366 




062766 


001300 


000032 

WWWW WM 




BIS 


• BP I800*N0RI111> TC(R6) 


;SET 800 BPI 


3366 


012H22 


00H367 


173132 






JSR 


R3, TnCHD 


/URITE 3200 UORD RECORD 


3367 


012H26 


016H20 








UORD 


UTBUF 




3368 


012H30 


171600 








UORD 


-3200. 




3369 


012>432 


163H00 








UORD 


-6*400 




3370 


012H3H 


000060 








UORD 


UFUD 




3371 
3372 
3373 


Q12H36 


006216 








INC 


(R6) 


/SET GO BIT 


012HH0 


022710 


163*400 




IS 


CMP 


M ^ A A / B A \ 

11-6*400. / (RO) 


. 1 I A 1 ▼ f AB I IB 1 T 1 k.ltf* *T A <~ ▼ rtO T 

/UfllT FOR URITINu TO START 


337H 


G12HHH 


OOlOOH 








BNE 


2S 




3376 


012>t>t6 


03271 1 


0*40000 






B 1 T 


IIERR< (PI) 


' MAk.1 1 TAS PBBAB BIT 

/flONITOK ERROR BIT 


3376 


012H62 


001022 








BNE 


99S 




33*^7 


012H6'* 


000771 








BR 


IS 




3378 


















3379 


012H66 








23 








3380 


012*466 


00*4767 


1 71 676 






ICO 


T 1 MAkI 

rC» T inON 


■TIIDkl TIMrO AM 
/ 1 UKN 1 1 ntK UN 


3381 


012H62 


1057! 1 






3% 


TCTD 

TSTB 


(R 1 J 


• ODQkiru LlUCkl DCQnV CCTC 


3382 


012H6H 


100*402 








on 1 


•45 




3383 


012t66 


000163 


00'4'4bO 






IMD 

Jnr 


T 1 Mr D / D T \ 


/ OU lU 11 ntK & KL'UKN UIH 1 


3384 


















338B 


012*472 


012700 


000003 




•4% 


now 


i 3/ RU 


Cr T CUlCT ^AIIklT 

/ St 1 SH 1 r I (.(7UNI 


3386 


012H76 


00620*4 








QCD 






3387 


012600 


006300 








DbC 


on 




3388 


012602 


001376 








BNt 


r c 




3389 


01260*4 


00*4767 


17ZbZ6 






ICD 


or uQiTonv 
Y\.i HH 1 1 KUT 




3390 


012610 


102*403 








BVS 


991 




3391 


012612 


00*4767 


171770 






JSR 


P C / T 1 nOK 


. CHECK I 1 nt 


3392 


012616 


000*401 








BR 


lOOS 




3393 


















339H 


012620 


10*4*400 






995. 


HLT 






3395 


012622 


10*4000 






1005- 


SCOPE 






3396 


















3397 










/ TEST 


AAX AATA 

026-DhTh 


▼ 1 / 4 Z_ AnBB 1 \ 

T ItlE ( 160UBP 1 ) 




3398 


01262^ 


112737 


000026 


001126 


TST026 


MOVB 


ff02b/ dlTSTNUn 




3399 


012632 


106737 


001 133 






TSTB 


^•ki0 7ri r* 
•INkZF Lo 


DDQftjru ic no 1 ur *ijd7 ami v 
» BKMnt.n Ir UK I uc. ivf-L UrlL T 


3H00 


012636 


0010*46 








BNt 


TSTOZf 


■CCT DCTIIDM or COAM TIMPD 
/ St 1 KtlUKn rv. rKUn 1 intK 


3H01 


OlZBtG 


012702 


012620 






now 


• 3S' R2 


3H02 


0126HH 


00'»767 


172572 






JSR 


DPU 1 kin 


■ DCU 1 MH CI □itr 
/ KtH 1 nU dLHVt 


3H03 


012660 


102*437 








BVS 


99S 


.BRANCH IF ERROR ON REUIND 


3ilOH 


012S62 


062766 


002300 


000032 




BIS 


«?E16004-H0Rni1,TC(P6) 


.SET 1600 BPI 


3it06 


012660 


00H367 


17277H 






JSR 


R3,TncnD 


/-URITE 3200 UORD RECORD 


3H06 


01266*4 


016*420 








UORD 






Tit A** 

JHU7 


0 1 2bbb 


1 f 1 bUU 














3H08 


012670 


163H00 








UORD 


-6*400 




3H09 


012672 


000060 








UORD 


UFUD 


•SET 'GO" BIT 


jmo 


01267H 


00S216 








INC 


(R6) 


3H\2 


012676 


022710 


163*400 




IS 


CUP 


«-6H00 , (RO) 


/BRANCH UHEN URITING START 


3m3 


012602 


OOlOOH 








BNE 


2S 





F 7 

D2TUG-B Tn02/TElb DRIVE FUNCTION TIMER nflCYll 30(10146) 02-DEC-77 09 PRGE 83 
C2TUGC Pll 02-DEC-77 09- i4b STRRT OF TESTS 



SEQ 0083 



2m4 
3m5 

3>4lb 

31417 

3m3 
3m9 
3^ 20 
3»4 21 
3*422 
3M23 
34 2^ 
3>425 
3H2b 
34 27 
3428 
3429 
3430 
3431 
3432 
3433 
3434 
3435 
3436 
3437 
3438 
3439 
3440 
3H41 
3HH2 
3443 
3444 
344B 
3446 
3447 
3448 
3449 
3450 
3451 
3452 
3453 
3454 
3455 
3456 
3457 
3458 
3459 
3460 
3461 
3462 
3463 
3H64 
3465 
3466 
3467 
346S 
3469 



012604 
012610 
012612 

012614 
012614 
012620 
012622 
012624 

012630 
012632 
012634 
012640 
012642 
012646 

012650 
012b52 



012654 
012662 
012666 
012672 
012674 
012676 
012700 
012702 
012706 

012710 
012712 
012714 

012720 
012724 
012726 
012732 

012734 
012736 



012740 
012746 
012752 
012766 
012760 
012764 
012766 
012772 
012774 
012776 



032711 
001017 
000771 



004767 
105711 
100402 
000163 

006204 
006204 
004767 
102403 
004767 
000401 

104400 
104000 



112737 
012702 
004337 
000000 
000000 
000000 
000024 
004767 
005215 

105711 
100402 
000163 

004767 
102403 
004767 
000401 

104400 
104000 



040000 

171540 
004450 

172376 
171640 



000027 
012710 
005560 



17146: 

004'4B0 
172312 
171664 



2% 
3i 

4$ 



995 
lOOS 



BIT 
BNE 
BR 



JSR 
TSTB 

Bn. 
JHP 

nsR 

flSR 
JSR 
BVS 
JSR 
BR 

HLT 
SCOPE 



KERR, (Rl) 

99» 

If 



PC, TinON 

(Rl) 

4t 

TinER(R3) 

R4 
R4 

PCURITRDY 
99S 

PCTinOK 
100% 



,nONIT0R ERROR BIT 



,TURN TIMER ON 

^BRRNCH UHEN REROY SETS 

,G0 TO TIMER k RETURN VIR R2 

, DIVIDE TIME BY 4 

/CHECK TIME 



001126 



.TEST 027-ERflSE 

,THIS TST MEASURES TIME FROM 'GO' si 



TST027 MOVB 
MOV 
JSR 
UORD 
UORD 
UORD 
UORD 
JSR 
INC 



IS 



2S 



995 
lOOi 



TSTB 

BMI 

JMP 

JSR 
BVS 
JSR 
BR 

HLT 
SCOPE 



ll27,dtTSTNUn 
K1%,R2 
R3/dtTnCnD 

0 
0 
0 

ERASE 
PC, T I HON 
(R6) 

(Rl ) 
25 

TIMER(R3) 

PC, MR! TROY 
995 

PC, TIMOf 
1005 



TO "RDY'sl 

,SET RETURN PC FROM TIMER 



.TURN TIMER ON 
,SET 'GO' BIT 

BRANCH UHEN READY SETS 

.GO TO TIMER I RETURN VIA R2 



,TEST-030 TAPE MARK 

.THIS TEST MEASURES TIME FROM 'GO'sl TO 'RDY'=I 



112737 


000030 001126 


TST030 MOVB 


«30,dlTSTNUH 


012702 


013010 


MOV 


;i5.R2 


004767 


172446 


JSR 


PC, WRITE 


006216 




INC 


(R5) 


00H767 


172262 


JSR 


PC-UAITROY 


102H23 




BVS 


995 


004337 


006660 


JSR 


R3,aiTnCMD 


OOGOOO 




UORD 


0 


000000 




UORO 


0 


000000 




UORD 


0 



.SET PETUFN PC FROM TIMER 

URiTE A RECORD 
.SET •GO' e T 



D2TUG-B Tn02/TElb DRIVE FUNCTION 
CZTUGC Pll 02-DEC-77 09 



314 70 


013000 


000026 




3M71 


013002 


00H767 


171352 


31472 


013006 


005215 




Z^7Z 








31474 


013010 


105711 




31475 


013012 


100402 




31476 


oi3om 


000163 


004450 


3477 








31478 


013020 


004767 


172212 


34^9 


013024 


102403 




3480 


013026 


004767 


171454 


:48t 


013032 


000401 




"4S2 








:4S3 


013034 


104400 




:4S4 


013036 






:4SE 


01Z03b 


004767 


172300 


'43b 


"ji:o4: 


102''"'4 




:4S" 


n 'D44 


104000 




:48s 









TinER nflCYll 30(1046 
STRRT OF TESTS 

. UORD 

JSR 

INC 

15 TSTB 
Btll 

jnp 

2S JSR 
BVS 
JSR 
BR 

995 HLT 
1005 

JSR 
BVS 
SCOPE 



G 7 

02-DEC-77 09 48 PRGE 84 



SEQ 0084 



UFHK 

PC/TinON ,TURN TIHER ON 

(R5) .SET 'GO' BIT 

(Rl) .8RRNCH UHEN RERDV SETS 

25 

TinER(R3) ,G0 TO TIMER & RETURN UIR R2 

PC.HRITRDY 
995 

PCTinOK 
1005 



PC, REUIND ,REUINO SLRVE 

995 ,8RRNCH IF ERROR ON REUINO 



H 7 

D2TUG-B Tn02/TElb DRIVE FUNCTION TlflER MPCYll 30(10Hb) 02-DEC-77 09 48 
C2TUGC Pll 02-DEC-77 09- Hb START OF TESTS 



3H89 


01304b 


012700 


000012 




FINISH 


MOV 


•10 ,R0 


3H90 


013052 


000004 


001400 




IS 


TYPE,CRLF 


3491 


01305b 


005300 








DEC 


RO 


3492 


Q130bO 


001374 








BNE 


IS 


3493 


0130b2 


032777 


000100 


165710 




BIT 


•SUOb.dSUR 


3494 


013070 


001410 








BEQ 


2S 


3495 


013072 


113700 


001010 






nouB 


aiORVNun.RO 


349b 


01307b 


113701 


001011 






nouB 


aiSLVNun.Ri 


3497 


013102 


113702 


001012 






nova 


aiSLUPTR,R2 


3498 


01310b 


000137 


007440 






jnp 


dITYPHOR 


3499 


013112 


105237 


001011 




2S 


INCB 


dISLVNUn 


3500 


01311b 


005237 


001012 






INC 


atSLUPTR 


3501 


013122 


122737 


000010 


001011 




cnPB 


• 8. .dlSLVNUn 


3502 


013130 


001402 








BEQ 


3S 


3503 


013132 


000137 


00720b 






jnp 


dIBEGIN 


3504 


01313b 


105037 


001011 




3S 


CLRB 


dtSLVNUn 


3505 


013142 


105237 


001010 






INCB 


dlORVNUn 


350b 


01314b 


122737 


000010 


001010 




cnPB 


«8 ,dlORVNUn 


3507 


013154 


001402 








BEQ 


END 


3508 


Gl315b 


000137 


007206 






jnp 


dIBEGiN 


3509 
















3510 


0131b2 








END 






3511 
















3512 












ttttttUt 10DIFIED 8 


3513 
















3514 














RCTll END OF 


3515 
















351b 
















3517 












+ 




3518 
















3519 


0131b2 


0057b7 


lb5576 






TST 


RUTOM 


3520 


0l31bb 


001015 








BNE 


2S 


3521 


013170 


105737 


001131 






TSTB 


dSUNTFNO 


3522 


013174 


001004 








BNE 


IS 


3523 


01317b 


000004 


014567 






TYPE.E 


UNIT 


3524 


013202 


000137 


005730 






jnp 


d«INIT 


3525 


01320b 


000000 






IS 


HOLT 




352b 


013210 


004 7b7 


166560 






JSR 


PCCKSWR 


3527 


013214 


000005 








RESET 




3528 


01321b 


000137 


005730 






jnp 


«l8INtT 


3629 
















3530 


013222 


000004 


014014 




25 


TYPE.nSGfl 


3531 


01322b 


0052b7 


165552 






INC 


PCNTR 


3532 


013232 


013702 


001004 






nov 


il»PCNTR,P2 


3533 


01323b 


004 7b7 


167372 






JSR 


PCTYPOCT 


3534 


013242 


0057b7 


165534 






TST 


PRFLG 


3535 


01324b 


001002 








BNE 


3S 


363b 


013250 


0052b7 


165526 






INC 


P9FLG 


3537 


013254 


013704 


000042 




3S 


nov 


d«42,R4 


3538 


0l32b0 


001405 








BEQ 


HERE 


3539 


0132b2 


000005 








RESET 




3540 


0132b4 


004714 






SENDflD 


JSR 


PC, <R4 » 


3541 


0l32bb 


000240 








NOP 




354 2 


013270 


00C240 








NOP 




354 3 


013272 


000240 








NOP 




3544 


013274 








HCPE 







PRGE 86 



SEQ 0085 



,SET LINE FEED COUNT 



,SCT NEXT SLRVE « 

;RNO ITS POINTER 

;BRRNCH IF LRST SLRVE (7) 

; BEG IN TEST ON NEXT SLRVE 
xSET SLRVE «0 
;RNO INCREHENT DRIVE ff 
;RND CHECK IF LRST DRIVE 



n*t*ttt**tt*tu$tuttttttt*t 



;RUTOnRTIC n0DE'» 
,BRRNCH - IF YES 
BPRNCH IF R UNIT URS FOUND 



, CHECK FOR CNTL G 
.RESTART 

> PR INT END OF PRSS 
,BUnP PRSS COUNTER 

GET END OF PASS COUNT 
,RND TYPE IT 
.PRSS INDICATOR SET^^ 
.BRRNCH - IF YES 
,SET PASS INDICATOR 
.CONTENTS OF 42 TO R4 
.BRANCH IF NOT AUTO ttODE 
.CLEAR THE UORLD 
.RETURN TO nONITOP 



I 7 

D2TUG-B Tn02/TE16 ORIUE FUNCTION TIHER nflCYU 30(10^6) 02-DEC-77 09 PRGE 8b 
CZTUGC PH 02-0EC-77 09 •^6 START OF TESTS 



SEQ 0086 



3545 


013274 


006767 


165464 


TST 


RUTOn 


.CHECK FOR flUTOn nODE 


35X6 


013300 


001010 




BNE 


It 


, BRANCH - IF YES 


354 7 


013302 


032777 


0Q4000 165470 


BIT 


»4000,dSUR 


•SEE IF HALT ON PASS 


3548 


013310 


001004 




BNE 


If 


, BRANCH - IF NOT 


3549 


013312 


000000 




HALT 






3550 


013314 


004767 


166454 


JSR 


PCCKSHR 


; CHECK FOR CONTOL G 


3551 


013320 


000005 




RESET 




, CLEAR THE UORLD 


3552 


013322 


000137 


005730 15 


jnP: 


dtlNtT 


.RESTART 



3553 

3554 tttttttttttttttttttnttttttttttttttt**tU**ttttttUtttttUUUtt 

:555 



J 7 

DZTUG-B Tn02/TElb DRIVE FUNCTION TIHER nRCYll 30(10H6) 02-DEC-77 09 H8 PRGE 87 SEQ 0087 

C2TU6C Pll G2-DEC-77 09 START OF TESTS 



3557 










,SKEU 


TOPE TItlING TESTS 






3558 










,THE 


FOLLOUING 


TESTS REQUIRE 


A SPECIALLY 


URITTEN 800 BP 1 SKEU TAPE 


3559 


01332b 


012737 


013334 


00100b 


SKEUTST nOV 


ITSTOSl.dlSCPPDR 


;SET SCOPE POINTER 


35bO 




















35bl 










,TEST 


031- SKEW 


TAPE SPEED TEST-FORUARD 




35b2 










,THIS 


TEST READS 32" OF TAPE 


(2b400. -800. s 26b00. FRAnES),THEN 


35b3 










, DIVIDES TIME BY 32. TO GET 


rmE TO READ 


1" (800. FRAMES) OF TAPE 


3Sbit 


01333it 


112737 


000031 


00112b 


TSTG31 nOVB 


•Sl.dlTSTNUn 






3Sb5 


0133H2 


012702 


013>420 






HOV 


«2I,R2 




,SET RETURN PC FROM TIMER 


35bb 


Ol33Hb 


OOH 7b7 


171770 






JSR 


PC. REUIND 




; REUIND SLAVE 


35b7 


013362 


102'4m 








BVS 


991 




.BRANCH IF ERROR ON REUIND 


35b8 


01335»4 


0627b6 


001300 


000032 




BIS 


tBPI800^N0Rnil,TC(R6; 


,SET 800 BPI 


35b9 


0l33b2 


0627b5 


000010 


000010 




BIS 


»BAI,CS2(R5) 




.INHIBIT BUS ADDRESS INCREMENT 


3570 


013370 


00H337 


0055b0 






JSR 


R3. siTncno 




/READ 32" OF TAPE-FORUARD 


3571 


01337H 


01bH20 








UORO 


RDBUF 






3572 


G1337b 


\77777 








UORD 


-I. 






:673 


013H00 


0b3HH0 






lOS 


UORD 


2b>400 




.FRAME COUNT 


357H 


0131402 


000070 








UORO 


RDFUD 






3575 


013H0H 


006215 








INC 


(R6) 




.SET 'GO' BIT 


357b 




















3577 


013H0b 


022710 


oomno 




IS 


cnp 


«800 . (RO) 




.UAIT FOR FIRST 800 FRAMES 


3678 


013m2 


101375 








BHt 


\% 




.TO BE READ 


3579 




















3580 


013mH 


00^ 7b7 


17G7H0 






JSR 


PC TinON 




.TURN TIMER ON 


3581 


013H20 


023710 


013H00 




2S 


CUP 


atlOf. (RO) 




.UAIT FOR READING TO FINISH 


3582 


013H24 


1G34GZ 








BLC 


35 






3583 


Ot3H2b 


G0Glb3 


0041450 






jnp 


TmER(R3) 




.GO TO TIMER & RETURN VIA R2 


358H 




















3586 


Ot3H32 


012700 


GG0GO5 




3S 


nov 


«5.R0 




:DIVI0E TIME BY 32 


358b 


013'43b 


00b20M 






45 


RSR 


P4 






3687 


Ol3^^o 


0063GG 








DEC 


RO 






3688 


013HH2 


001375 








BNE 


45 






3689 


013HHi« 


OOH 7b7 


171630 






JSR 


PC.RHINIT 




INIT OR! WE 


3690 


out 60 


OOM 7b7 


171032 






JSR 


PC.TIflOK 




.CHECK TIME 


3691 


013H6H 


OOOHOl 








BR 


1005 






3692 




















3693 


013i<5b 


lO^^OO 






99S 


HLT 








359H 


013HbO 


lOMOOO 






IGGS 


SCOPE 








3696 




















369b 










,TEST 


032-SKEU 


TAPE SPEED TEST-REVERSE 




3697 










,TH»S 


TEST READS FORUARO 40" 


(32000. FRAMES) OF TAPE, THEN READS REVERSE 


3698 










,32" 


(2b'400. -800. = 25b00. FRAMES) OF TAPE THE TIME IS THEN DIVIDED BY 


3699 










. Zl 


TO GET TIME TO READ 1" 


(800 FRAMES) OF TAPE 


3b00 


Ol3Hb2 


112737 


0GGG32 


00112b 


TSTG32 riOVB 


t32,dlTSTNUt1 




.SET RETURN PC FROM TIMER 


3b01 


013H70 


012702 


013blb 






MOV 


135, R2 




3b02 


01 3H7H 


00H7b7 


171b42 






JSR 


PC REUIND 




.REUIND SLAVE 


3b03 


013600 


102Hb6 








BVS 


9?5 




.BRANCH IF ERROR ON REUIND 


360H 


013S02 


0627b6 


001300 


000032 




BIS 


t6Pt800^N0Rt111,TC(R6) 




3b06 


013610 


0627b6 


000010 


000010 




BIS 


•BAI,CS2(R6) 




.READ FORUARO 32000 FRAMES 


3b0b 


01361b 


00H337 


0055b0 






JSR 


R3/dlTt1CnD 




3b07 


013622 


01bH20 








UORD 


RDBUF 




.UORD COUNT 


3b08 


0t362H 


\77777 








UORD 


-1 




3b09 


01362b 


07bH00 






lOS 


UORD 


32000 




; FRAME COUNT 


3blC 


013630 


00C070 








UORD 


RDFUD 




.READ FORUARO 


3bll 


01363^ 


006215 








INC 


(R6) 




.SET 'GO' BIT 


3bl2 





















DZTUG-3 


Tt102/TE16 DRIVE 


FUNCTION TIMER 


nflCYii 


30(1046) 


K 7 

02-DEC-77 09 48 PAGE 


CZTUGC 


Pll 


D2-DEC-77 


09 46 




START 


OF TESTS 


3613 


01353H 


023710 


013626 




li- 


CMP 


illOt, (RO) 


36m 


0135H0 


101375 








BHI 


If 


3615 














3616 


0135H2 


004767 


171432 






JSR 


PC.RHINIT 


3617 


0135it6 


004767 


171172 






JSR 


PC, DELAY 


3618 


013552 


052765 


001300 


000032 




BIS 


• BPI8004-N0Rnil,TC(R5) 


3619 


013560 


052765 


000010 


000010 




BIS 


• BnLCS2(R5) 


3620 


013666 


004337 


006660 






JSR 


R3, dlTMCnO 


3621 


013672 


G16420 








UORD 


RDBUF 


3622 


01367*4 


177777 








UORD 


-1. 


3623 


013576 


063440 






tis 


UORD 


26400 


362H 


013600 


000076 








UORD 


RDREV 


3625 


013602 


005215 








INC 


(R5) 


3626 
















3627 


013604 


022710 


0Q144G 




2S 


cnp 


1(800 , (RO) 


3628 


013610 


101376 








BHI 


2f 


3629 
















3630 


013612 


004767 


170542 






JSR 


PC/TmON 


3631 


013616 


023710 


013576 




3S 


CMP 


2«11«/ (RO) 


3632 


013622 


103402 








BLO 


4S 


3633 


01362H 


000163 


004450 






JMP 


TinER(R3) 


36314 
















3635 


013630 


012700 


000005 




4% 


nov 


85, RO 


3636 


013634 


006204 






5% 


PSR 


R4 


3637 


013636 


005300 








DEC 


RO 


3638 


013640 


001375 








6NE 


5% 


3639 


013642 


004767 


171332 






JSR 


PCRHINIT 


3640 


013646 


004767 


170634 






JSR 


PC, TinOK 


36>4l 


013652 


000401 








BR 


lOOt 


36H2 
















36H3 


013654 


104400 






99S- 


HLT 




36HH 


013656 








lOOS. 






36HS 


013656 


004767 


171460 






JSR 


PC, REUINO 


ZMb 


013662 


102774 








BUS 


99S 


36H7 


013664 


104000 








SCOPE 




36H8 
















36H9 


013666 


000137 


013046 






jnp 


dSFINISH 


3bSC 

















, INIT DRIVE 

;WAIT FOR TAPE MOTION TO STOP 
;SET 800 BP I 

; INHIBIT BUS ADDRESS INCRENENT 

/READ REVERSE 32" OF TAPE 

;REAO BUFFER 

;UORD COUNT 

; FRAME COUNT 

;READ REVERSE 

;SET 'GO' BIT 

;UAIT FOR FIRST 800 FRAMES 
,T0 BE READ 

;TURN TIMER ON 

;UAIT FOR ALL FRAMES TO BE READ 
,G0 TO TIMER L RETURN VIA R2 
, DIVIDE TIME BY 32 



-REMIND CLAVE 

.BRANCH IF ERROR ON REMIND 



D2TUG-B Tt102/TE16 ORIUE FUNCTION TIMER 
C2TUGC Pit 02-0EC-77 09 



3651 








































3(iB(i 








3657 








3658 


013672 


005067 


165066 

1 w www w 


3659 


013676 


005737 


0000>*2 


3660 


013702 


ooim? 




3661 


01370'* 


005267 


1 65051* 


3662 


013710 


023737 


00QQU2 

^#WWW * mm 


3663 


013716 


001'*03 




366^ 


013720 


105267 


1650** 3 


3665 


01372«» 


0001*16 




3666 


013726 


105267 


16503>t 


3667 


013732 


052777 


lomoo 


3668 


0137H0 


ooomo 




3669 


0137H2 


105737 


ooon>4 1 


3670 


0137H6 


001003 




3671 


013750 


105267 


16501>* 


3672 


0l375^ 


000H02 




3673 


013756 


1052b7 


16500' 


367H 


013762 


00020' 




3675 








3676 








3677 













L 7 




nocYU 


30(10>*6) 


02-DEC-77 09 »*8 PAGE 89 SEQ 


STRRT 


OF TESTS 






/ 


tttttlllNSERTED 11-8-77 ttUUUtttttttUtttttUUUtttU 


/ 
/ 


♦ 
♦ 


CHECK FOR OUriP flODE OR PUTOriATIC MODE 


CKnODE 


CLR 


flUTOH 


INIT RUTO MODE 




TST 


dm2 


AUTOMATIC MODE'' 




BEQ 


2f 


BRANCH - IF NOT 




INC 


nuTon 


SET AUTO MODE INDICATOR 




CMP 


«im2. am6 


ACTU MODE? 




8EQ 


It 


BRANCH - IF YES 




INCB 


XXOPM 


INDICATE XXDP AUTO MODE 




BR 


St 


AND EXIT 


li 


INCB 


flCTiin 


INDICATE ACT 11 AUTO MODE 




BIS 


«iomoo,asuR 


CON: CYCLE/ HALT ON ERROR. INHIBIT SUBTEST 




BR 


ss 


AND EXIT 




TSTB 


dim 


;nAN:MODE VIA ACTll/PAPER TAPE** 




BNE 


3t 


BRANCH - IF NOT 




INCB 


nounpn 


; INDICATE MAN MODE VIA ACTll/PAPER TAPE 




BR 


5t 


;AN0 EXIT 


3S 


INCB 


XDUnPM 


, INDICATE MANUAL MODE VIA XXDP 


5S 


RTS 


PC 


; RETURN 



tt*tttttttttttt*ttttttttttt*ttut*ttttttttttt*tttttttt*uttttttt 



DZTUG-B TM02/TE16 DRIVE FUNCTION TlflER 
CZTUGC Pll 02-DEC-77 09 46 



3678 
3679 
3680 
3681 
3682 

3683 0137611 

3684 013764 

3685 013766 

3686 013772 

3687 013776 

3688 OmOOO 

3689 014004 
i690 014010 
3691 014012 
3692 

369: 

:b?4 



nnCYll 30(1046) 02-DEC 
STRRT OF TESTS 



n 

■77 



09 



48 PAGE 90 



SEQ 0090 



014036 
164771 



ooooos 

000004 
105767 
00140S 

013700 000042 
00B037 000042 
004710 
000777 



ABORT 



IS 



ntttttt INSERTED 11-8-77 tttttttttUttttttUUUttttttt 
DISCONTINUE TESTING FOR 
ILLEGAL CONDITIONS 



RESET 
TYPE,nSGB 



TSTB 
BEQ 

now 

CLR 
JSR 
BR 



XXDPn 
It 

dl42,R0 
dl42 
PC, (RO) 



, INITIflLIZE THE UORLD 
;TYPE ABORT riESSAGE 
,XX0P AUTO MODE 
, BRANCH - IF NOT 
;GET nONITOR EXIT ADDRESS 
;USE AS ABORT FLAG 
;EXIT TO XXOP nONITOR 
/AND HRNG 



tttututttttttnuttttttttuutttttttttttttttttttutttttttttttt 



DZTUG-B Tn02/TE16 DRIVE FUNCTION T I riER nflCYll 30(10H6) 02-DEC-77 09. PRGE91 SEO 0091 

C2TUGC PU 02-DEC-77 09 •^6 PROGROfI tlESSHGES 

3b95 SBTTL PROGRfln flESSBGES 

3696 

3697 ;OPERPTOR INSTRUCTIONS 

369S 



D2TUG-B Tf102/TElb DRIVE FUNCTION TIHER 
CZTUGC Pll 02-DEC-77 09 •^^> 

3b99 ; 
3700 

3701 OlHOm 005015 0H7105 02010H nSGP: 

3702 01H022 0H3117 OBOOHO 051501 

3703 01 14030 020123 0200H0 0000>40 

370H Om036 005015 051120 0H3517 nSGB 

3705 OmOHH 0H0522 020115 OmiOl 

3706 0m052 OBI 117 0H252H QQOIOH 



B 8 

nnCYll 30(10H6) 02-0EC-77 09 H8 
PROGRRM nESSRGES 



PRGE 92 



SEQ 0092 



ttttttt INSERTED 11-8-77 ttntUtttttttttttttUttttUttt 

.nSCIZ <CR><LF>'END OF PnSS 

RSCIZ <CR><LF>'PROGRRn RBORTED' 



I 



D2TUG-B Tri02/TElb DRIVE FUNCTION TIMER MRCYll JOdOHb) 02-0EC-77 09 H8 PAGE 93 
C2TUGC Pll 02-DEC-77 09: PROGRflH MESSAGES 

3707 

3708 ttttttttttttttttttttttttttttuttutttttttttttuttnttttt* 

3709 



DZTUG-B Tn02/TElb DRIVE FUNCTION TIHER 
C2TUGC Pll 02-DEC-77 09 .^b 



0 8 

nflCYll JOdOHb) 02-DEC-77 09 H8 PAGE 9H 
PROGRRn MESSAGES 



J r 1 U 










"171 1 










f7\ 2 

w r 1 A* 






055103 

www i Uw 


05252U n 


771 1 




□ui^^n7 


Q52QUQ 


031 115 




ni un7u 


0520^7 


030505 




3715 


niuin2 


w3 1 ft U~ 


0H30H0 


QH71Q3 




QIUl 1Q 
u 1 ~ 1 1 w 


U A ■ 


QH652H 


000122 

WWW A Mtmt 


3717 


OlUl Ifi 


WW9W I w 


05H52H 


OH 2520 1 


3718 

w • AO 






051111 

W9 i A A I 


052123 


3719 


Q1U132 




0H21QH 


OH 2522 


3720 




051523 


0H7HH0 


020 106 


3721 


ommb 


OH 7503 


0521 16 


OH 7622 


3722 


01I415H 


OHbllH 


051105 


0200H0 


3723 


oimbi 


000 






372'* 


Oimb3 


12H 


050131 


020105 1 


3725 


Ol'4i70 


0146524 


031060 


0H20H0 


3726 


01<4l7b 


01(1(522 


OH 252b 


021HH0 


3727 


o{i420'< 


051*4(47 


0520H0 


020117 


3728 


0114212 


0*42502 


0520H0 


051606 


3729 


Qm220 


0*4252*4 


0201 OH 


000 


3730 


01<4225 


10b 


051117 


0520H0 1 


3731 


Om232 


030115 


Q200b2 


0511 OH 


3732 


Om2i40 


053111 


020105 




3733 


Om2i4H 


02b*4bO 


0520H0 


050131 1 


373'4 


om252 


020105 


0Hbl23 


053101 


3735 


0m2b0 


020105 


023HH3 


020123 


373fa 


01<42bb 


OH 752*4 


OHIOHO 


020106 


3737 


01427<4 


OH 252*4 


062123 


0H2105 


3738 


0m302 


OOOOHO 






3739 


01U30I4 


050123 


OH 2505 


0201 OH 1 


37H0 


0iH312 


0H252H 


052123 


020123 


37'* 1 


Om320 


0H7117 


05H5m 


020077 


37H2 


01*4326 


05HH50 


051505 


OH 7067 


37H3 


01<433'4 


020117 


020075 


027Hbl 




01H3^2 


02HHbO 


000 




37H5 


OlH3^5 


lib 


055122 


0H7HH0 1 


37Hb 


Om352 


OHbllb 


037631 


02H0H0 


37H7 


Om3bO 


0H2531 


027523 


OH 761b 


Z7^S 


0m3bb 


03bHH0 


030HHO 


030057 


7714Q 


0\HZ?H 


000051 







n Nfin .flSCIZ <CR><LF>'CZTUGC Tn2/T£lb OR FCNT THR ' 



I REG- flSCiZ <CR><LF>'TYPE FIRST flOORESS OF CONTROLLER 



I.DRVS. flSCIZ '/.TYPE TH02 DRIVE «'S TO BE TESTED 



I SLVS. flSCI I 'FOR Tn02 DRIVE ' 



I DRV flSCIZ '/.O- TYPE SLfiVE I'S TO BE TESTED 



I SKEW RSCI2 'SPEED TESTS ONLY-* (YES/NO = I'D)' 



I. NRZ flSClZ 'NRZ ONLY'' (YES/NO = 1/0) 



D2TUG-B Tri02/TElt> DRIVE FUNCTION TIMER 
C2TUGC Pll 02-DEC-77 09: 



MRCYll 30(10H6) 02-DEC 
•>ROGRPn HESSRGES 



E 

■77 



8 

09 



>48 PRGE 95 



SEQ 0095 





□lU37fe 


□05015 


047105 


020104 


M POT 








\j I • » w • 


0431 17 


052040 


050101 

WWW 1 W I 












006505 












3753 
















3754 










, PRROR 

/ k R ^ 


1 Ik wwnut w 




3755 


014416 


005015 

WW9W 1 W 


051 124 


050101 

W WW 1 W 1 


E TRP4 


flSCIZ 

r^W^ 1 k 


<CR><LF> ' TRAPPED TO 4* 


3756 




042520 


020104 


047524 








'^757 




032040 


000 

www 










3758 


014435 


116 


020117 


047503 


E. NCON 


PSCIZ 


'NO CONTROLLER RT fiODRESS SPEC IF lED' <CP><Lr> 


3759 


014442 


052116 


047522 


0461 14 








3760 


014450 


051105 


040440 


020124 








3761 


014456 


042101 


051104 


051505 








3762 


014464 


020123 


050123 


041505 








3763 


014472 


043111 


04251 1 


C06504 








376U 


014600 


000012 












3765 


014502 


046524 


031060 


042040 


E NDRV. 


PSCIZ 


•Tn02 DRIVE • 


2766 


014510 


044522 


042526 


000040 










014516 


051104 


053111 


020105 


E HSU 


fiSCII 


•DRIVE * 



D2TUG-B Tn02/TElb DRIVE FUNCTION TIIER flflCYll 30(10Hb) 02-0EC-77 
C2TUGC PU 02-0EC-77 09: Mb PROGRRfl MESSfiGES 



8 

09 M8 



PAGE 9b 



SEQ 0096 



3768 
3769 
3770 
3771 
3772 
3773 
377H 
3776 
3776 
3777 
3778 
3779 
3780 
3781 
3782 
3783 
378H 
3785 
3786 
3787 
3788 
3789 
3790 
3791 
3792 
3793 
379H 
3795 
3796 
3797 
3798 
3799 
3800 
3801 
3802 
3803 
380M 
3805 
3806 
3307 
3808 
3809 
3810 
3811 
3812 
3813 
38m 
3815 
3816 
3817 
3818 
3819 
3820 
3821 
3822 
3823 



Om52i4 
014532 
0m534 
0m5H2 
0m550 
0m55b 

omsbH 

0m6b7 
0m57H 
0m602 
01H610 
0m616 
0m62H 
0m63l 
0lH63b 
0m6HH 
014652 
014655 
014662 
014665 
014672 
014700 
014704 
014712 
014720 
014726 
014734 
014740 
014746 
014754 
014762 
01476b 
014774 
015002 
015010 
015013 
015020 
015026 
015034 
015042 
015050 
015054 
015062 



016064 

015072 
015100 
015106 
015114 
015122 
015130 
015136 
015144 
015152 
015160 



020060 
020105 
020060 
053101 
046102 
020122 
OOSOIS 

lib 
0310bO 
0200bb 
043040 
052040 
052123 

123 
051106 
042060 
006016 

124 
020043 

040 
042503 
061117 
061603 
041011 
041411 
004523 
00b503 
047440 
02010b 
020105 
00b622 
006016 
020122 
04bl06 
005015 

015 
020105 
042522 
062111 
047506 
006531 
043440 
000040 



026062 
025052 
025052 
025062 
0250!>2 
025052 
025062 
025062 
026062 
026062 
026062 



046123 063101 E. DRV: .ASCII '0 SLRVE ' 



04751b 020124 E. NRVA ASCIZ '0 NOT RVRILRBLE FOR TEST' <CR><LF> 

044601 040514 

020106 04750b 

042624 052123 
000 

020117 04b524 E. UNIT RSCIZ "NO Tt102/TElb UNIT FOUND TO TEST ' <CR><LF> 

052057 030505 

047125 052111 

052517 04211b 

020117 042524 
005016 000 



043117 020124 E SFT 

047622 020122 

052101 024601 
000 

051505 020124 E HDR 
000 

042504 044526 E HDRl 

042440 051122 
005015 

004461 041527 

004601 041506 

031123 042011 

051106 062011 
000012 

062125 047440 E H0R2 ASCIZ 

040522 04351b 

051105 047522 
000012 

044624 042616 E TinOV 

053117 051105 

053517 042105 
000 

052012 04b511 £ TinE.X 

054105 044620 

020104 040627 

047111 020107 

020122 042122 
000012 

060101 021440 E GAP RSCIZ 



flSCIZ 'SOFT ERROR (DATA) " <CR><LF> 

ASCIZ 'TEST » • 
ASCII • DEVICE ERROR' <CR><LF> 



RSCIZ CSr <HT>'UC'<HT>'8A'<HT>"FC*<HT>'CS2*<HT>'DS'<HT>'ER'<HT>'TC'<CR><LF> 

' OUT OF RANGE ERPOR ' <CR><LF > 
ASCIZ <CR><LF>'TlHEP OVERFLOUEO' <CR><LF> 
ASCIZ ^CP>nLF > TiriE EXPIPEO UfilTiNG FOR RDY'<CP><LF> 



CAP • ' 



, TinE DOCUMENT L INES 

025052 025062 L HDRl- ASCIZ • ttttttttUtUtttnttttttttUtnttUitttttUttttnttUttttttttttttttttttt 

026052 025052 

026062 026062 

026062 025062 

025052 025062 

025052 025052 

026062 025052 

025062 026052 

C260&2 025052 

025062 026062 

026062 025052 



D2TUG-B Tn02/TElb DRIVE FUNCTION TIMER 
C2TUGC Pll 02-0EC-77 09 



6 8 

fIflCYll 30(10««6) 02-0EC-77 09 HZ PAGE 97 
PROGRfln rESSRGES 



SEQ 0097 





Ui9 ibb 


n'vcnc^ 
UZbUb^ 


n'9cnc9 
UZbUbZ 


n9cnc9 
uzbUbA 








□lb 1 rH 


nncni c 
UUbUlb 


nnn 
UUU 










ni CI 77 




nc7nun 


n7ni 1 c 
u jui I b 


1 

L. 


nUn£ 


Sot,/ 






nci 1 nu 
ubi tut 


nc7i \ 1 

U9 Jl 1 1 










n'vni nc 


nc9cn& 


nu 1 c 1 f 
ui I b I b 






700Q 


UibZZU 


nuiicoit 

UllbZH 


nu7i 1 7 


nc7nun 
ubzufu 






Jo JU 




nu<.d 1 


nci 505 

Ub 1 9U9 


n9nn55 

UAUU93 






JO J 1 


ni C97U 


nci 1 nu 

Ub I 1 UH 


nc7i 1 1 

U9J 1 1 1 


n7ni05 

UAU 1U3 






7079 


ni C9U9 


n^nnb 7 










7077 


ni C9UU 

U lb*H"f 


n7nn(>n 


nu^i 77 

U1D 1 A J 


057101 

U9 J 1 U 1 


1 

L 




7B7U 

JO 


ni Cftif 


n7ni nc 


n7nnu 7 








7B 7C 
JO JO 


ni C9C(. 


n7nn<«n 


nun 




1 


JL V 


JO JO 


nic9<ti 

U 1 bAD 1 


071 


0U1UU0 


0U051Q 

U~U9 lU 


1 

k 




7fi77 
JO J' 


n 1 ft9(t(t 

U 1 3^DD 


0771 Id 


051UU0 
U9 1 nu 


051 105 

U w 1 1 U w 






JO Jo 


ni t;97u 


091 UUO 


nonouo 








JO J7 


ni C7nn 

U 1 3 JUU 




075012 


005015 

WW WW 1 w 


1 


HDR3- 

^1WI^ w 






□20052 


WW WW 


0*tl616 






JO^ 1 


U 1 3 J 1 ^ 


U~~9fc~ 


01471 17 


00*t*41 1 






JOH 


ni 6777 
U 1 9 J^^ 


OUUIi?U 

UH9*iT 


U~ w 1 w 


051*450 

Uw 1 ~ WW 






TflU 7 
JOf J 


nni77n 

U 13JJU 


nu7iirn 




0*4*4506 

U~ ~ wUw 






7RUU 


□ 11^776 

SJ t9j Jw 


nuo507 


QUUC2U 


0*47117 

W~ ' 1 * ' 










00*«>«61 


0HH62H 


0*«2616 






JO~ w 




U~ U~ WW 


062103 

w -J m» t W W 


0140626 






181*7 






006016 


000 




















7 




122 


0H7101 


0*42607 


L 


RNG 




015372 


036076 


000 








J09 1 




101 


052103 


0*40626 


L 


PCT 


7RC7 


ni Kun7 


U«j09 1 ~ 


000 








J03J 














JODt 










,TEST 1 


7iIC& 
J099 




052 

U9Ai 


057I4UQ 


0*4*4522 

W ' » WAi A* 


r\ 


TOOl 


JB3D 


n 1 ci4 1 7 


0142521* 


QU7Qua 


0*47622 






J09r 




020115 


0t7602 


00*4 62*( 






7R(«S 


ni6U26 












J037 


niu27 


052 


QC7UUn 

W ww~~ w 


0*4*4622 


A. 


T002 


JBDU 


niKtt7tt 




0511(110 

Uw i ■ ~ W 


0*4062*4 






JOD 1 


nicuu? 


052122 


OOHHl 1 

W W ■ » 1 1 


000 

WWW 






7Sk9 








0*4*4522 

W » » WMW 




T003 


7Sf.t 
JBO J 






051(4*40 


062610 






7S<>U 
JoO** 


men ft? 




053517 

Www w 1 r 


00*4516 

WW « W 1 w 






JOD3 


w 1 3~ r U 


000 










JBOD 




052 

U W A* 


053*4 140 

Uw«J~ ~ W 


0*4*4622 




TOOH 


JOOr 


U 1 91 r D 


nu 2i^2u 


051*4*40 


062106 






JODO 






0*42106 

W~ mm 1 WW 


063617 








01 SSI 2 

U 1 99 1 A 




000 

WWW 








JOr U 


U 1 99 1 9 


052 


0510*40 

W W 1 w~ w 


0*40606 




T006 




niRK22 


020101* 


061 106 


0*46617 






3872 


016630 


OHIOHO 


062117 


00H*411 






3873 


016636 


000 










387U 


015637 


062 


0610H0 


OH 0606 


fl 


T006 


3876 


0166HH 


0201 OH 


062123 


061101 






3876 


016662 


00H62H 


00001 1 








3877 


016666 


020362 


0H2622 


0H2101 




T007 


3878 


01666>t 


06litH0 


062610 


0H212*4 






3879 


016672 


063617 


00H516 


00001 1 







L. HDR2 OSCM '« Tt102 DRIUE FUNCTION TlflES- DRIVE « 



L DRV RSCII '0 SLRVE « 



flSCIZ •* FUNCTION' <HT>«:HT>'TmE(SPECIFiCRTION) <HT> ' TlMECRCTUflL ) * <CR><LF> 



fl. T002 flSClZ ■« URITE STRRT'<HT><HT> 



n T003 .flSCIZ •» URITE SHUTDOUN' <HT^ 



fl TOOH flSClZ •* URITE SETTLEDOUN'<HT> 



fl T006 flSCIZ •* READ FROM BOT'<HT><HT> 



fl T006- flSCIZ ■« READ START' <HT><HT> 



fl T007 flSCIZ •« READ SHUTDOWN' <HT><HT> 



DZTUG-B Tn02/TElb DRIVE FUNCTION TlflER 
CZTUGC Pll 02-0EC-77 09: 





UlboOU 


OZOObZ 


nil 9C ^9 

UHZbZZ 


nil 9 4 n 1 


H. 


Tni n 


TOO 1 

3881 


0 l9oOc 


nc 4 ii ii n 
□blHHU 


UbZlub 


nil£. 4 9ll 

UHblZH 






iSoZ 


□l9blH 


nixOA nc 
UHZ lUb 


nc 7C1 7 

UbJbi f 


nnuci c 
UUHb lb 






iooi 


U ibbZZ 


nnn 
UUU 










700I1 


u19dZj 


ubZ 


nc 4 fill n 


nuncnc 


n 
M 


Tm 4 
lUl 1 


3883 


n4 C£.7n 


noni nil 
UZQIDH 


nil 9C99 


n9ni 9& 






TOOL. 


rn C£. 7C 


nC91 9 7 

UbZiZJ 


nci 1 ni 

Ubi 1 Ui 


nnuc9u 
UUH9Z'l 






3oof 


Ul9b4H 


nnn 
UUU 










38oo 


UibbHb 


nc9 
UbZ 


nci nun 
udiuiu 


nuncnc 


Q 

M, 


im 9 




ni CC.C9 
Ulbbb^ 


n9ni nu 


nu9C99 


n9ni 9t. 

U^U 1 £B 






7QQn 


U 1 9BDU 


nuui 9 7 

UIH 1 ^ J 


nC91 9C 
U9^ 1 ^9 


nu7cnu 

ut 1 9Ut 








U 1 bbbb 


nU71 97 
UH f lit 


nnnni i 










Ulbbr L 


n9nnc9 


nU9C99 


nu9ini 

ut AlUl 


□ 


Tni 7 

1 U 1 w 




ni C7nn 

Ul9r uu 


nci nun 

U9 1 Ut U 


U9 J 1 U9 


nci uun 

U9 1 ttU 






70QI1 


U 1 9 r UD 


nR9i nc 

U9^ 1 U9 


nu(>i 9u 

UtB 1 


nu7i nc 

\J~ t» 1 U9 






7fiQC^ 


ni C71I1 

U 1 9r li 


nC7C1 7 
U9 J9 1 r 


nnuci (> 

UUt9 1 B 


nnn 

UUU 






7BQf> 
^070 


ni C791 
U I9r CI 


nt9 

U9^ 


nc9nun 


nci 1 9C 

U9 1 ( ^9 


Q 


TQIU 

i U 1 ^ 




ni K77t. 
U 1 9r ^B 


n9ni 1 (> 

U^U 1 1 B 


nci 1 ni 

U9 1 1 U 1 


nC2C17 

U9^9 1 ■ 








ni li77U 


nu9i 1 (> 


nu7nun 

u^ ^u^u 


nufeioc 

U~ w i U9 






7QOQ 


Til C7li9 


ncucni 

U9f 9U 1 


nu7nun 
ut^utu 


nci ncc 

U9 1 U99 






7Qnn 

47UU 


ni i;7cn 

U 1 9' 9U 


nnnni i 

UUUU 1 1 










i^7U 1 


ni H7«i7 


n9DflC2 

UAUU9^ 


0C252U 


nu7i22 




T015 


7Qn9 

^7U^ 


U 1 9* BU 


nunuun 

U~Ut~U 




nu7i26 






J7U J 


ni c;7<,<t 

U 1 9 r DO 


n9ni nu 




nuci6iu 












026622 


onuBOb 

■ www 






J7U9 


nifenn? 


nnn 

UUU 










^7UO 


ni t,nn7 


U9^ 




060101 

www i W i 




TOlb 


7Qn7 
j7U« 


ni (.ni n 

U 1 BU 1 u 


ni^i uun 

U9 I ~ ~ U 


U33 III 


□2(i6nB 

w^ w wUw 






iJ7UB 


ni CkHi Ck 

U 1 BU 1 B 


n(;9i 97 

U9^ 1 mm^ 


U9U 111 








7<)nQ 

J7U7 


U 1 BU^t 


w~ w 1 U & 




000 






^7 1 U 


ni<>n7i 

U IBUJ 1 


U9i6 


OU 7UUQ 


0601 01 

U WU 1 U i 




T017 


7Q1 1 

37 1 1 


U 1 BUwD 


ni^i uun 

w9 I ~~U 


nc^i 1 1 

U9 w 111 


026606 

UibO wW w 






J7 1 i. 


ni c>nuu 

U 1 BUH 


nt91 97 

Uw^ 1 Ai<> 


nci 1Q1 








7Q1 7 
u7 1 J 


ni fin(^7 

U 1 CU9^ 


U~U9 t U 


QU31 1U 


00001 1 

uu wU A A 






7Q1 U 

j7 1 


n 1 f^nkn 

U 1 BUBU 


n7nnii9 

U^UU9^ 




020120 




T020 


7Q1 C 
j7I 9 


U 1 BUBB 




nu2C72 


0UUU66 






7Q1 1. 


ni (>n7u 

U 1 BUr f 


n(i2i ifk 


nci iQC 

U9 1 1 Uw 


n«l2522 

U~ *tWA»4» 






7Q1 7 

J7 1 f 


ni f>i n? 

U 1 B 1 U^ 


nu7(in7 


nu2122 

U~ ^ 1 fcAi 


QQQOl 1 

U WU A 1 






7Q1 C 


ni ci in 

UIBI lU 


n9nn«i9 


nuncQ7 

U~U9Ur 


n2ni 20 


0 


T021 


J71 7 


m c>i 1 

U 1 B 1 IB 


nu7cn7 


nc 1 C 1 d 

U9 1 9 1 w 


OCI^I 1 

WW I w 1 i 








ni CI 9u 

U 1 B 1 ^1 


nunc9u 


nu 1 CI f> 

U~ 1 9 1 w 


uu 1 WW 1 






7Q9 1 
J7^ 1 


ni<«« 79 


nnn 

UUU 










7Q'99 
J7^^ 


ni t.1 77 

U 1 BI «Jil 


nc9 

U9^ 


nu2nun 

u~ ^u^u 


162101 

^w^ 1 U i 




T023 


709 7 


niciun 

UIBltU 


n9ni ni 

U^U 1 U 1 


nuuc9u 


U~ & w i w 






7Q9U 


ni ftiuCt 

U 1 B 1 IB 


0710^^ 

WW i U99 


□3Q06Q 


060102 

U WU A U«B 






7091^ 
J7^9 


n 1 d 1 cu 

U 1 B 1 9^ 


nnuci 1 

UW^9 1 t 


000 

www 








7Q9C> 
u7£B 


ni CI C7 

U 1 B 1 9r 


U9^ 


w~ ^w~ w 


062101 

U w«* i U I 




TC21 


7Q97 


ni (>i dii 

U 1 B 1 B1 


n9nini 

U^U 1 U 1 




Q*t2616 

U^Aw i w 






3928 


01bl72 


032H5S 


033066 


050102 






3929 


016200 


00H61 1 


000 








3930 


016203 


062 


o^20^o 


062101 


n 


T025 


3931 


016210 


020101 


o^^62^ 


0H2516 






3932 


016216 


03H065 


030060 


050102 






3933 


01622H 


00l»9ll 


000 








393M 


016227 


062 


0^20^C 


06:ioi 


fl 


T026 


3936 


01623>* 


020101 


0HM62H 


OH 2816 







H 8 

nflCYll 30(10H6) 02-DEC-77 09 PAGE 98 
PROGRPM riESSRGES 

aiOlO ASCIZ '« READ SETTLEOOUN'<HT> 



P TOll PSCIZ '« RERD REV STRRT'<HT> 



fl. T012. flSCIZ •* READ REV SHUTOOHN'<HT) 



fi T013 .flSClZ ■» READ REV SETTLEOOUN'<HT> 



0 T01»» fiSClZ •* TURN PROUNO OELPY F-R*<HT> 



n T015 flSCIZ '« TURN PROUND OELPY P-FVHT> 



R TOlb PSCI2 ■» GPP SIZE-STOP HflLF*vHT> 



SEQ 0098 



P T017 PSCIZ •* GPP SJZE-STPRT HPLF'<HT> 



P T020 PSCI2 •* GPP SlZE-INTERRECOPD'<HT. 



P T021 PSCIZ ■* GPP CONSISTRNCY' >'HT; 



P T023 PSCiZ '» DPTP T lOE-ZOOBP I ' <HT^ 



P TC2H PSCIZ •» Dfl"'P TinE-55bBPI '<HT 



P T025 PSCIZ 't DPTP TmE-800BPI ' <HT^ 



fl T026 PSCIZ » DPTP T IME- 1600BP I ' ' HT 



I 8 

D2TUG-B Tn02/TElb ORIUE FUNCTION TltlER nflCYU 30(lOHfa) 02-DEC-77 09 48 PAGE 99 SEQ 0099 

CZTUGC Pll 02-0EC-77 09 PROGRAM MESSfiGES 

7SZb 01b242 0304BB 030066 0H1060 
016250 0HH520 OOOOll 



I 



D2TUG-B Tt102/TElb DRIVE FUNCTION TIMER 
CZTUGC Pll 02-0tC-77 09 .^b 



3938 


01625'4 


020052 


A^ 4 * AP 

051 105 


051501 


n 
H 


T0Z7 


3939 


016262 


020105 


All Ap 

040507 


AAA 4 An 

0201 20 






39k»0 


016270 


nil li If All 


nit 4 E 

04Z515 


00001 1 






39m 


016276 


020052 


AP « 4 A9 

051 1Z7 


nc A 4 4 4 
ObZi 11 


H. 


Tn 7n 
TU30 


39H2 


01630>t 


M/tAi> A^ 

020105 


All li P AX 

o^^506 


All AP 4 li 

04Z51H 






39*4 3 


016312 


0'46'4HO 


051 101 


Anil p 4 9 

00451 3 






39'*M 


016320 


000 










39** 5 


016321 


052 


nc '^nun 
0bZ04u 


ncni ni 
UbUIUI 


H 


Tmi 


39'*b 


016326 


020105 


AP n4 ^ 9 

050123 


nil ^cnc 
04Zb0b 






39*4 7 


01633M 


A A/. F nil 

026504 


053506 


nniicnii 
004 b04 






3948 


0163HZ 


000 












0163^3 


nc ^9 


nc^nun 
0bZ040 


ncn 4 n4 
ObOl Ul 


Q 

H 


TnT? 
1 U 


3950 


016360 


UZClUb 


ncni Of 


nil "^cnc 






3961 


016356 


□Z6bOH 


nil '>coo 
U4^b^Z 


nniiC9c 
UU4b^b 








01o3d4 


nnn 
UUU 










39Di 














395*4 


U163D3 


Ul b 


Ubr U 1 ^ 


nnni n7 

UUU 1 Uf 


1 

L 


f KITR 


70CC 

39b& 


U1 DJ'^ ^ 


UUsU t b 


us J3£ J 


n7(>i; 77 

U^DSm^ 


1 




37bfa 




nnn 

UUU 












UibHUi 


nun 


nu 7niin 

U"* ' uiu 




1 

L 


i^C N 




U 1 o^uo 




OOD 








3959 


oibmi 


015 


037412 


005015 


L 


QUEST 


3960 


Olbmb 


000 










3961 




ClbHZO 










3962 




016M20 










3963 




016420 










39faH 


Ol6^zo 


000200 










3965 




000001 











J 8 

HRCY11 30(10^6) O2-DEC-77 09 ^8 PRGE 100 
PROGRAn MESSAGES 

R T027 flSClZ '« ERASE GRP TIHEXHT) 



fl. T030 fiSCiZ ■« HRITE FILE nflRK'<HT> 



R T031 RSCIZ 't TAPE SPEEO-FUO' <HT> 



R T032 RSCIZ '* TAPE SPEED-REV <H1 > 



SEO 0100 



NEU= • 

ASCIZ tCR><LF>"»'<CP><LF> 



EVEN 
RDBUF= 
14TBUF = 

BLKU 128 

END 



n7T 1 ir — D 
1 Uu~D 


TMn'j yTr < £. no 


ut 


CI Ikl/" T 1 AkI 

r UNL I 1 ON 


T 1 MCD 
1 1 MtK 


MRCYll 


30(10H6 


V. Z 1 Uuv. 


D 1 1 n^) T\c r . 


-77 
'ft 


no it£. 
U7 Ho 




CROSS REFCRENCI 


Q 

H 


nil ncn 




7ncn> 
iUbUi 


7ncc 
oUbb 






HBuK 1 


01 Ji'bH 




ZHl7 


7£.07> 






HLCL = 


1 nnnnn 




1 7nn* 








C\C T 1 t M 

HL 1 1 1 n 


UUO/'ob 




1 nC9M 

lUbZli 


ZHbU 


3666> 




QfM IMDM 

HUUnrn 


UUUr rU 






7C71 * 






Hriu 1 HB 


nn 4 ii 1 c 
UUiH lb 




1 7091 


1 7cn 
1 r bU 


1778 




QC - 

Hi = 


UUUUlb 




1 1 QOB 

1 17711 










nn 1 1 7ii 
UU 1 1 J4 




1 779> 

\ ■if Lit 


ZHHU* 


268H 


2686t 


H 1 H 


lUUUUU 




1 9COS 

1 ZboW 








QT 1 MC 

H 1 1 nt 


nni m c 
UUlUlb 




1 7CB> 


1 7C'? 
1 f bA 


1780 


18HHX 


QT \ HTD 

HI 1 n 1 D 


nni n^n 
UU 1 UZU 




1 7iLaa 


1 R99 


2003t 




Ql ITAM 

Hu 1 un 


UUU/oH 




1 n<^i s 
lUbit 


9U 1 7 
1 J 


2693 


3519 


H 1 UU 1 


ni cunc 
U 1 sHUs 




iHbb 


7fl&&l 

Jebbtt 






H 1 UUZ 






1 llC7 

1 Hb^ 


Job7li 






H 1 UU J 


ni CUU7 

U 1 57H I 




1 ucs 

1 HbO 


OOD^w 






H 1 UUH 


ni CU71 

U 1 ( 1 




1 UCQ 
1 197 


«30DDw 






H 1 UU3 


ni CC1 

U 1 3S 1 3 




1 iif>n 

1 HoU 


7R7ni 
JO' Uff 






H 1 uuo 


ni 

U 1 b3 




1 lit.1 
1 HD 1 


7R7bl 
JOf HU 






□ Tnn7 

H 1 UU' 


ni cccc. 




1 UC>9 


7R77i 
jOf f • 






H 1 UIU 


ni cf.nn 
u 1 bouu 




1 UC.7 • 


oOOUw 






Q Tfii 1 
H 1 Ul 1 


UtDD^O 




1 UC>U 


7RRU8 

OOO^ If 






H 1 Ul Z 


ni ccuc 

U 1 9Dt3 




1 tD9 


7RRR8 
jOOOtt 






□ Tni 7 

H 1 UU 


ni ct7^ 




1 U(>f> 
1 HDD 


70091 
J07An 






Q Tni li 

H. lUlH 


m C791 




1 Ut7 


007D1I 






Q Tni c 

H. IU13 


ni C7C7 




1 *tDo 


07U 1 It 






Q Tni 

H. lUlD 


ni cnn7 

U 1 DUU J 




1 TD7 


w 7UOn 






Q Tni 7 


ni c>n7i 

U 1 DU J 1 




iu7n 








Q Tn9n 

n. 1 MtM 


UIOUBU 




1 U71 


191 U8 






H. lU^l 


m C1 1 n 
uiei lU 




Iff* 


791 Rl 

07 1 Oil 






H 1 UZ J 


m <Li 77 




lift 


79998 






Q Tn^u 

H. 1 U^H 


ni CI c7 
Ul oi sr 




1 *t f 9 


799(18 

07^DW 






Q Tn9C 
H. IU^3 


ni t9n7 

U 1 O^U J 




1 U7^ 


197138 






H. lU^D 


Ul bZZr 




1 U77 


797bS 

J7 JH W 












1 b7S 


797R8 






Q Tmn 

H 1 U JU 






1 b7Q 

1 f f 7 


79(11 8 
J 71 1 » 






a THTI 
H 1 UJl 


ni<;79i 




1 70U 








H 1 Mil. 


ni C7ii 7 
u lb jH J 




1 bSI 

I HO I 


79U98 
0 77 711 






Hid 


nnnunn 

UUUHUU 




1 99lll 
1 LL^9 








HI f 


nni nnn 

UUl UUU 




1 ^^9W 








on 
BH 


nnnnnii 

UUUUUf 




1 1 Qlit 
1 1 71 w 


97(^9t 






BH 1 - 


nnnni n 

UUUUIU 




1 9bnt 

1 ^HUW 


09D7 


3b06 


3619 


or n 1 u 
Btu IN 


nn7'»nt 
UUr «Ub 




^D9ew 


7Hn7 


:«;o8 




DCl 1 

BtLL 


nni iin7 

UUlHUr 




1 7RRI 


1 9(>f> 

1 73D 






DVCl ClJ 


nni un7 




1 7B<;t 


1 fl71 

1 Or I 






DnT - 
BU 1 


nnnnn9 

UUUUU^ 




1 ^99W 


9999 






Br 1 ^UU- 


nnnnnn 

UUUUUU 




1 i^7DW 








DD 1 ccc — 

Br 1 bbb- 


nnnii nn 

UUUM UU 




1 9Q7I 
1 L^f « 


7 79R 






DD 1 onn— 
Br 1 OUU- 


nni nnn 

UUIUUU 




1 9QRI 
1 ^70* 




3668 


360^ 


DD TWC f — 

Br 1 Wtt - 


nnnn i 

UUUUI 1 




1 1 kflt 
1 1 DOW 








tun 11 - 


nnn79n 

UUUJZU 




1 ^79w 








{" ijt^ now 


nnc.7117 
UUb jH^ 




^7 7 1 


^H 79 


2606« 






UUDOt o 




ASIA 




267HS 




CH'' = 


01 0000 




12901 


1717 






CKfiooe 


013672 




2H12 


3b68f 






CKSW» 


001 77>* 




1H92» 


1910 


1960 


1981 


CLR 


000040 




12W29 









K 8 

02-DEC-77 09: H8 PRGE 
fRBLE — USER SYnSOLS 



102 



SEQ 0101 



2101X 
36S8« 



210s 
3661 1 



2107 



2139X 21H3 



2mB 



3618 



202: 



3526 



3550 



L 8 



DZTUG-B 


Tn02/TE16 DRIVE 


FUNCTION 


TIMER 


MBCYll 


30(1046) 


02-DEC 


-77 09 


48 PAGE 


103 








SEQ 01 


C2TUGC 


Pll 02-0EC-77 


09 46 




CROSS REFERENCE 


TABLE - 


- USER SYMBOLS 












CNTLU 


00203M 


1499» 


1610 


Z4 J9 




















CNTRLC= 


000003 


13121 
























CNTRLO= 


000017 


13161 


1891 






















CNTRLU= 


000025 


13171 


1873 






















CNUDEC 


002734 


16911 
























CNVOCT 


002626 


16611 
























CNVTflO 


00326H 


17931 


2462 






















CNUTD 


0027H6 


1692 


16998 






















CNUTO 


002610 


1662 


16608 






















rOUNT 


001770 


14891 


1606* 


1 CI c 
1919 


t9^7* 


















'P = 


000016 


13161 


1386 


1 7QQ 


1 OSU 


2494 




77(11 
or Ul 


3704 


3712 


3717 


3760 3766 


3768 






3770 


3776 


7701 


77Q7 

■if Of 


3790 


77QC 
jr 79 


77Q4 


3803 


3813 


3839 


3840 3964 


3966 






3969 
























:rlf 


oomoo 


138611 


1764 


1 r o9 


1 Or D 


1884 


1 Q7(> 
1 7£D 


1 Q79 


1962 


2458 


3490 






csith = 


002000 


12791 
























«.S1 


000000 


11921 


2638 






















rs2 = 


000010 


1196ff 


2225X 




79kf>t 


2247* 






2639 


3669* 


3606* 


3619* 




OflSh 


ooimi 


13891 


1747 


1 f f 9 




















OB 


000022 


12008 
























OCONST 


0030HZ 


1704 


1708 


1 71 1 

1 r 1 I 


1 771 1 


















DELAY 


00H7H4 


1989 


21698 




79(>U 

A(7W~ 


3120 


3148 


3617 

WW 4 r 












DELfiYW 


004774 


2172» 


3219 






















OELTIM 


001120 


13628 


2172 


4tl f 7 


171 3t 


3220* 
















0 1 GTRB 


001136 


13748 


1676 


1 7nQ 


2^17 


2547 




2^99 


2724 


2726 








DIVIDE 


006032 


2099 


2137 


71 ()78 




















DLT = 


100000 


12628 
























DPR 


000400 


12628 
























DRIVE 


000040 


10348 
























DRIVES 


006212 


24748 


2525 






















DRVflVR 


006122 


22268 


2514 


















2634 2637 


2643 


DRVNUn 


001010 


13548 


2226 


7236 


2247 


2613* 


2646* 


2694* 


2616* 


2630* 


2633* 






2668 


2680* 






3606 
















DRVTBL 


001160 


13828 


2476 




25Q11 


2607 


2620* 


2636 


2577 


2661 








DRY = 


000200 


12618 
























DRYCLR= 


000010 


12128 
























DS 


000012 


11978 


1994 


2257 


2263 


2273 


2292 


2294 


2298 


2737 


2943 






DT 


000026 


12028 


2226 


2238 


2651 


2663 


2727 














DTE 


OlOOOG 


12818 
























DWO 


004000 


12278 
























DVD = 


000000 


12328 
























DUl 


000001 


12338 
























DU2 = 


000002 


12348 
























DU3 


000003 


12368 
























DVH = 


000004 


12368 
























DVB = 


000006 


12378 
























DV6 = 


000006 


12388 
























DV7 = 


000007 


12398 
























ECHO 


001406 


13878 


18781 


i 00*( 




















Enmc= 


000030 


11718 
























END 


013162 


2668 


3607 


36108 




















EOT 


002000 


12638 


2263 






















ER - 


000014 

W www • ■ 


11988 


1931 






















EROSE = 


0C0024 


12148 


3442 














2528* 


2601* 


2b05 




ERFLG 


001127 


13678 


19121 


1991* 


1999 


2439* 


2474* 


2519* 


2522 


3302 


ERR = 


040000 


12678 


2273 


2294 


2796 


2822 


2828 


2901 


2931 


2937 


2994 


3025 3031 




3338 


3376 


3414 





















n 8 

DZTUG-B Tn02/TE16 DRIVE FUNCTION TIHER nRCYll 30(10H6) 02-OEC-77 09 H8 PAGE 10>4 
CZTUGC Pll 02-0EC-77 09 H6 CROSS REFERENCE TABLE — USER SYHBOLS 



SEQ 01 OJ 



ERRTRP 


0036SH 


19031 


2472 


2b09 






ERRUEC= 


OOOOOH 


llb4i 


244 It 


2442* 


2472* 


2609* 


E DRU 


01i4B2it 


2598t 


3768ft 








E GAP 


OlSOSt 


1782 


3809ft 








E HDR 


OmbBB 


1915 


3785ft 








E HORl 


OmbbS 


1942 


3787ft 








E H0R2 


0m7H0 


1922 


3795ft 








E NQVn 


Ol^53^ 


25171 


2518 


2599* 


3770ft 




E NCON 


0l^^36 


2470 


37581 








E NORV 


om502 


2516 


37651 








E NSLU 


omsib 


2b00 


3767ft 








E SFT 


omb3i 


1939 


3781ft 








E TIHE 


01S013 


22bl 


3803ft 








E Tino 


0m7bb 


20b7 


3799ft 








E TRPH 


ommb 


37551 










E UNIT 


01i45b7 


3523 


3775ft 








rc = 


OOOOOb 


11951 


1996 


2335* 


2345* 


2361* 


rcE 


001000 


12781 










FINISH 


0130Hb 


2b3b 


3489ft 


3b49 






FnT 


000020 


1274» 










FPEUEC= 


0002^^ 


1177« 










FRHCNT= 


177M00 


1309« 


2310 


2320 


2330 


2899 


FUOSPC 


005476 


2335S 










GAP 


001124 


13b4« 


1769 


1783 


2140 


3253* 


GAPOK 


OOHblb 


2123« 


3258 








GAPTBL 


001 ObO 


13bl8 


3233 


3255 


3264 




GO 


000001 


1208ft 










GTinTB 


001576 


1437ft 


1773 


177b 


2143 


2145 


HERE 


013274 


3538 


3544ft 








HI.T 


104400 


13031 


20b8 


2109 


2147 


2765 






3009 


304b 


3054 


3080 


3110 






3455 


3483 


3593 


3643 




KT 


000011 


13131 


1392 


3790 


3840 


3855 






3888 


3892 


389b 


3901 


3906 






3941 


3945 


3949 






IDB 


000010 


1267« 










IE = 


000100 


1222« 










ILF 


000001 


1270ft 










ILR 


000002 


1271ft 










INBUF 


001270 


13841 


1795 


1862 


2443* 


2482 


tNCVAE= 


000100 


1275ft 










INIT 


005730 


1308 


1341 


1899 


2402ft 


2471 


I0TVEC= 


000020 


llb9» 










IR = 


000100 


1243ft 










ITCNT 


001125 


13b5« 


1823 


2001 


2004* 


2007 


1 DRV 


014244 


2547* 


3733ft 








1 DRVS 


014163 


2480 


3724 ft 








1 NRZ 


014345 


2709 


3745ft 








1 REG 


OlHllb 


24 bO 


3717ft 








1 SKEU 


014304 


2b98 


3739ft 








1 SLVS 


014225 


2548 


3730ft 




3704 


3712 


LF s 


000012 


1314ft 


1385 


3701 




3790 


3795 


3799 


3803 


3813 


LKS = 


1 7754b 


1183ft 










LKVEC = 


000100 


1184ft 










LPB = 


17751b 


llSbft 











2735 3243 
2992 

3259* 3260 



2785 


2811 


2844 


28bb 


2888 


2917 


2962 


2978 


3134 


3162 


3194 


3280 


3320 


3357 


3394 


3431 


3859 


3862 


38bb 


3870 


3874 


3877 


3880 


3884 


3910 


3914 


3918 


3922 


392b 


3930 


3934 


3938 


2550 


2700 


2711 












3524 


3528 


3552 












2013* 


2437* 














3717 


3750 


3755 


3758 


3770 


3775 


3781 


3787 


3839 


3840 


3954 


3955 


3959 









N 8 

DZTUG-B Tn02/TE16 DRIVE FUNCTION TltlER riACYll 30(tOHb) 02-DEC-77 09: H8 PAGE 105 
CZTUGC Pit 02-DEC-77 09- CROSS REFERENCE TRBLE UCCS SYHBOLS 



SEQ 01 OH 



LPS = 


1775m 


11851 






L ACT 


01537& 


1751 


1779 


38611 


L CHAN 


0152bl 


272bX 


2729* 


383bil 


L CNTG 


Gtb3b5 


m98 


395Ha 




L ORV 


0152HH 


272H« 


38331 




L HORl 


0l50bit 


2723 


38131 




L HDR2 


015177 


2730 


382b» 




L HDR3 


015300 


2732 


3839t 




L NEU 


OlbHOl 


1502 


39571 




L QUES 


Glbmi 


1522 


3959t 




L PNG 


0153b5 


17HH 


1772 


3849* 


L SLV 


01525b 


2725* 


38351 




L SUP 


01b372 


1499 


396611 




nCPE = 


OZOOOO 


12281 






HOPE = 


OOOtOO 


121*51 






MEDIUM 


oooom 


1037« 






nnuEC = 


000250 


1178« 






MOL = 


010000 


12b5l 






MR = 


00002H 


1201« 


2037 


2039 


MSGR 


omom 


3530 


3701 » 




MSGS 


01>*03b 


2m8 


3b85 


37041 


nxF = 


001000 


12Hbl 






M EOT 


0m37b 


22bb 


3750» 




M NAM 


omobo 


22b5 


2459 


37121 


NRHPTR 


001 b7b 


m55« 


18H8 




NED 


010000 


12H9« 






NEF 


OOHOOO 


12801 






NEU = 


OOHOOO 


12H8I 






NOP = 


000000 


1209X 






NOPfltls 


000300 


129m 


2251 


3328 


NR2FLG 


001133 


13711 


2708* 


271 b« 


NSG - 


ooo^oo 


1277» 






NXTDRW 


0070HH 


2b31« 


2bH9 




NXTSLV 


007122 


2bmi 


2b52 


2b64 


OCTRLO 


001122 


13b3it 


179b 


24b3 


OOIGIT 


001150 


1379* 


lbb2 


lb81 


OPI = 


020000 


12821 






OR = 


000200 


12Hm 






OSC 


000100 


128b« 


2037 


2039 


OUT 


0022i»it 


m93 


m97 


1617 


OUTBUF= 


006730 


13081 






OUTGRP 


003152 


17b7l 


1926 


2151 


OUTSPC 


00305b 


1739« 


1862 


1928 


PRFLG 


001002 


1350« 


363H 


3&3b» 


PflRWEC= 


0001 m 


1175t 






PRT 


000020 


12m« 






PCNTR 


00 loot 


13H0* 


136111 


3531 X 


PEFLRC= 


000200 


127b« 






PES = 


OOOOHO 


12591 






PE1600= 


002000 


12991 


1932 


3404 


PFVEC = 


00002H 


1170« 


1324 




PGE 


002000 


12H7I 






PIP 


020000 


12bbl 


2298 




PIRQ = 


177772 


115bl 






PIRUEC= 


0002H0 


11 7b» 






PLKCSR= 


I725H0 


1181« 







2058 2073 



33b5 
3399 



1702 



2044 
16341 



198b 



3632 



3404 



35b8 3b04 



3bl8 



171b 
2068 



21b9 239b 

2073 



DZTUG-B Tn02/TE16 DRIVE FUNCTION TmER 



B 9 

nncYii 30(to^6) 02-DEC-77 09: ^8 page 1 06 



SEQ 0106 



CZTUGC 


Pli 02-0EC-77 


09: H6 




CROSS REFERENCE 


TRBLE -- 


USER SYriBOLS 








PLKVEC= 


0001 OH 


11821 




















PRGFLG 


001130 


13681 


2H36t 


2H85t 


262H 


26HH 


2563* 


2669 


2607 


2687X 


270511 


PSEL = 


002000 


12261 




















PSW = 


17777b 


iisti 




















PUBL IS 


0033a2 


18201 


2012 


















ROBUF = 


016>t20 


2318 


2328 


3671 


3607 


3621 


39621 










RDFUD = 


000070 


12201 


2321 


357«4 


3610 














RDREV = 


00007S 


12211 


2331 


362H 
















ROSU 


001772 


m90l 


1513t 


1680 


1582t 














PDY = 


000200 


12231 




















PERD 


006HH2 


23171 


2862 


287'* 


Z89b 


2926 


3097 


31'47 


323H 


3239 




PESUEC= 


000010 


1166S 




















PEl/RO 


30SH60 


23271 


2965 


2989 


3020 


3067 


3091 


3121 


3mH 


3177 


3181 


PHINIT 


005200 


1990 


2228 


22'46ft 


2286 


3689 


3616 


3639 








pnR = 


OOOQOH 


1272» 




















PUD 


00000b 


1211ft 


2290 


















RUDOFFr 


000002 


1210X 




















SC = 


100000 


1230ft 




















SCOPE = 


lOHOOC 


130Hft 


2766 


2786 


2812 


28H5 


2ob7 


Zoo? 


2918 


2963 


2979 






3111 


3135 


3163 


3195 


3281 


33Zi 


7 7CO 


3396 


3«*32 


3>t56 


SCPODR 


QOlOOb 


1353ft 


1992 


ZOO7V 


ZOb? 


2733* 












SDUN = 


000020 


1258ft 


2803 


2826 


2835 


2908 


Z93b 


2943 


3000 


3029 


3037 


SIZE 


oo7om 


2H52 


2611ft 


















SKEUTS 


ai332b 


27m 


3559ft 


















SLP = 


000001 


125Uft 




















SLAVES 


00bHH2 


2523 


2528ft 


ZbOo 
















SLR 


\7777H 


1155ft 




















SLVflVfl 


005150 


2236ft 


2596 


















SLVNUn 


001011 


1355ft 


2237 


ZZ47 


Z97b« 


2616t 


9^7 1 • 

ZbJl I 


OL.l1. i * 


26"* 7» 


26H8 


2650 






3H99* 


3501 


















SLVPTR 


001012 


1356ft 


2617* 


ZbbO 


ZboZ* 


3H97 












SLVTBL 


001170 


1383ft 


2529 


7C 


ZbbH 


2576 


Zoi f 










SN = 


000030 


1203ft 


2368 


ZifO 


'» 70 7 


2391 












SNPT 


005600 


2368ft 


2731 


















SPPCE 


oomm 


1391ft 




















SPRCE2 


001H13 


1390ft 


19H7 


















SPCFWO= 


000030 


1215ft 


2336 


















SPCREV= 


000032 


1216ft 


231*6 


















SPR = 


002000 


1289ft 


2238 


















SSC 


000100 


1260ft 




















STiriTB 


001H22 


IHOIft 


17HS 


I 7H9 


Z1U9 


2107 












STKPTP= 


OOObOO 


13HHft 


2H02 


















SUSUR 


006770 


2m6 


2H17 


^HZJff 
















SUR 


001000 


13>t8ft 


m92 


IbOO 


4 C 7^* 


1913 


1 73H 


1 ac7 

1 73 f 


1983 


1987 


2005 




2m9 


2'* 26 


oil 7n* 
ZH jU'( 


■7L 77 
Zt J J 


3H93 




JDDr % 








SUREG 


000176 


1336ft 


1H92 


ZH 


ZH 














SU06 = 


000100 


1021ft 


3H93 


















SU07 = 


000200 


102rft 




















SU08 = 


OOOHOO 


1019ft 


1983 


Z1H7 
















SW09 = 


001000 


1018ft 


195H 


















SWIO = 


002000 


1017ft 


2010 


















sun = 


OOHOOO 


1016ft 


2005 


















SW13 = 


020000 


1015ft 


1913 


















sum = 


OHOOOO 


lomft 


1987 


















SUt5 - 


100000 


1013ft 




















TRP = 


OMOOOO 


1291ft 


2226 



















3226 



3010 
3187 



30H7 
359H 



3081 
36H7 



2669 



2681 « 3H96 



20m 



2016 



OZTUG-B 


Tt102/TE16 DRIVE 


FUNCTION TinER 


flRCYll 


30(1046) 


02-OEC 


CZTUGC 


Ptl 02-0EC-77 


flQ- U(> 
U7. "fO 




CROSS REFERENCE 


TRBLE - 


TB\TUE= 


oooom 


I I COW 


I J 1 7 








TC = 


000032 

www W w mm 


1 9nuM 

1 aUHw 


1 7 


1950 


2237* 


2260* 






J lU 1 


7778* 


336S* 


3404* 


3S68X 


TCRLF 


00236<4 


1 CI u 


1 R7QI 

I3f 711 








TEtlPST 


00176b 


1 usst 


1 StfVtt 


1524* 


1626* 


15261 


TIB 


00176*4 


1U87I 




1495* 


1496 


1607* 
















TIMER 


Q04i»S0 






2071 


2074 


2163 






7Q1 n 

C7 I U 


7i)UC 


2971 


3002 


3039 










3448 


3476 


3683 


T IMERR 


00HH60 




£UOr 11 








T iMERO 


00<4474 












T IMCRl 


00141*24 












inOK 


004506 


20851 


2763 

M 1 OW 


2782 


2809 


2841 








3131 

W i w I 


31S9 


3191 


3277 


TinON 


004360 


2Q35t 


2159 


2174 


2764 


2773 






3036 

WU WW 


3068 


3098 


3122 


3150 






w7wU 


3630 








TKB 


177562 


1 1591 


1494 


1540* 


1545 


1866 


TK ISR 


003612 


1331 

I ^w t 


1889* 








TKS = 


177560 


1 1581 


1639* 


1542* 


1643 


1863 


TKVEC = 


000060 


1 173t 

111 WW 


1330 








TriBRSE 


001014 


1357S 


1982 


2463* 


2464 




Tncno 


005560 


2286 


2307 


2317 


2327 


2369* 






3620 










Tncsi = 


172440 


1 189fi 


1367 








TflK = 


000004 


1256it 










TPB = 


177566 


1 16111 


1648* 








TPS = 


1 7''564 


1 16Q8 

I I WWW 


1646 








TPVEC = 


000064 


1 1 7148 










TRRPVC= 


000034 


1 172* 










TRE = 


040000 


12298 










TRTVEC= 


000014 


116711 








1985 


TSTNUn 


001126 


1366* 


1846 


1851 


1916 






2871* 


2893* 


2922* 


2958* 


2983* 






3289* 


3324* 


3361* 


3398* 


3436* 


TSTOOl 


007566 


2733 


2740 


2749* 






TST002 


007652 


2770» 










TST003 


007730 


2790* 










T'STOOH 


010020 


2816* 










TST005 


010126 


2849* 










TST006 


010212 


2871* 










TST007 


010276 


2893* 










TSTOlO 


010376 


2922* 










TSTOll 


010516 


29588 










TST012 


010614 


2983* 










TST013 


010724 


3014* 










TSTOm 


011064 


3060* 










TST016 


011156 


3085* 










TST016 


011264 


3114* 










TST017 


011360 


3138* 










TST020 


011470 


3167* 










TST021 


011610 


3209* 










TST022 


012114 


3285* 










TST023 


012122 


3289* 










TST02H 


012244 


3324* 











77 09 48 PAGE 107 SEQ 0106 

USER SYnBOLS 



2261* 
3604* 


2660* 
3618* 


2767 


2776 


2857 


2879 


2969 


3071 


1628* 
1608 


1632 
1611 


1618 


1520 


1527* 


1528 


1641* 


1545* 


2178 
3073 
3633 


2738 
3103 


2769 
3127 


2778 
3166 


2806 
3187 


2837 
3245 


2869 
3310 


2881 
3346 


2863 
3317 
2801 
3182 


2885 
3364 
283J 
3240 


2914 
3391 
2854 
3307 


2949 
3428 
2876 
3343 


2975 
3452 
2906 
3380 


3006 
3480 
2942 
3419 


3043 
3690 
2966 
3443 


3077 
3640 
2999 
3471 


1889 
















2722* 
















3293 


3329 


3366 


3406 


3438 


3466 


3570 


3606 


2019 

3014* 

3460* 


2102 

3060* 

3564* 


2438* 
3086* 
3600* 


2749* 
3114* 


2770* 
3138* 


2790* 
3167* 


2816* 
3209* 


2849* 
3286* 



DZTUG-B 


THD2/TE16 


DR 1 UF F UNC T 1 ON 


T IflER 


nflCYii 


30(1046) 


Q2-DEC- 

iJ ma Ub ^ 


0 9 
77 09 


48 PRGE 


108 

t Ww 










SEQ 01 

■Jb V W A 


C2TUGC 


Pll 02- 


DEC-77 09 *46 




CROSS REFERENCE 


TRBLE 

t FIB b b 


USER SYHBOLS 














TST025 


01237*4 


3361t 

W «J W 1 W 


























TST02b 


01 252'* 


33981 


























TST027 


0126514 


3*400 


3*436* 
























TST030 


0127*40 


3*4 60i 


























TST031 


0133314 


3559 


356*4* 
























TSTiJ32 




36001 

W W WWW 


























TT IN 


WW *( • W 


1506 

1 WWW 


1539* 
























TT INI 


002266 

UW*i**WW 


15*43ff 


15*4*4 
























TT IN2 


002302 


15*461 

1 3~ WW 


15*47 
























TYPOEC 


0027*42 

WW*> ( * A* 


16981 


17*46 


17*49 


1753 


1774 


1777 


1781 














T 1 PE - 


00000*4 

WWWWW ' 


13051 


1*498 


m99 


15C2 


\S22 


1579 


1681 


1716 


1744 


1747 


1750 


1751 


1764 






1772 


1775 


1778 


1779 


1782 


1785 


1849 


1871 


1876 


1882 


1884 


1916 


1922 






1926 


1929 


1939 


1942 


1947 


1962 


1966 


2067 


2261 


2266 


2266 


2396 


2418 






2*458 


2H59 


2*460 


2470 


2480 


2616 


2618 


2648 


2600 


2698 


2709 


2723 


2730 






2732 


3*490 


3523 


3530 


3686 




















00235b 

\m mm a* V W %r 


1577* 


159*4 


1623 






















TYPE 2 


002*40*4 


1578 


158U* 
























TYPE3 


002*41 2 


1581 


1587* 
























1 YPE<4 


002*416 


1585 


1590* 
























TYPFLG 


001132 


1370S 


1651X 


1659* 


1679 


1691* 


1698* 


1714 














TYPHDR 


007*4*40 


269*4 


2720* 


3H98 






















TYPOCT 


00263*4 


1501 


1659* 


178*4 


1917 


1946 


1961 


3633 
















177770 


11579 


























UN^ = 


0*40000 

W ' WW w W 


1283» 


























UNTFND 


001 131 

WW 1 1 W 1 


1369$ 


2618* 


2679* 


3521 




















UPE = 


020000 

W M WW WW 


1250it 


























UR 1 TRO 


00B236 


2255« 


2271 


2337 


2343 


2347 


2761 


2780 


2807 


2839 


2861 


2883 


2912 


29H7 






2962 


2973 


2987 


3004 


3018 


3041 


3064 


3075 


3089 


3094 


3106 


3118 


3129 






31*42 


3146 


3157 


3171 


3176 


3179 


3189 


3217 


3227 


3237 


32"»7 


3316 


3362 






3389 


3H26 


3H50 


3464 


3478 


















uniTTi 


0052H0 


22561 


2259« 
























UC = 


000002 


1193« 


2360X 
























UCE = 


0*40000 


1251» 


























UCHKF = 


OOOOBO 


1217» 


























UCHKR = 


0000B6 

w w w W^W 


1218* 


























UFflK = 


000026 

W WWW *aW 


1213* 


3*470 
























UFUO = 


000060 


1219» 


2311 


3297 


ZZZZ 


3370 


3409 
















UROCNT= 


1 77600 


13101 


2309 


2319 


2329 




















UP ITE 


005H2*) 


2269 


2307* 


234 1 


2753 


2771 


:?9i 


2817 


2960 


2986 


3016 


3062 


3087 


3116 






31*40 


3169 


3173 


3215 


3462 


















UPL = 


00*4000 


126*4* 


























URT BK 


005516 


23*41* 


2872 


2894 


2924 




















UTBUF : 


016*420 


2308 


329*4 


3330 


3367 


3406 


39638 
















XDUflPtI 


000771 


1065* 


3673* 
























xxDPn 


000767 


1063* 


26H5 


3664* 


3686 




















SCHfWC 


002330 


1567* 


1610* 


1614* 


1620 




















SCNTRL 


002331 


1568* 


1675* 


1577 


1606 


1893* 


















SCRLF 


002332 


1569* 


1579 
























SENORD 


01326*4 


10H5 


35H0* 
























SF ILL 


002321 


1561* 


























SHT = 


000011 


1559* 


1590 
























SNULL 


002320 


1560* 


1595 
























4SUPC = 


00076H 


1032* 


1051 
























4TKFLG 


002323 


156H* 


























STPB 


002326 


1566* 


lb07* 
























STPFLG 


002322 


1562* 



























D2TUG-B 


rn02/TE16 ORIUE 


FUNCTION 


TirCR 


flfiCYU 


30(10H6) 


02-DEC- 


E 9 
77 09: H8 PAGE 


109 






C2TUGC 


PU 02-DEC-77 


09: H6 




CROSS REFERENCE 


TflBLE -- 


USER 


SYnBOLS 








STP3 


002324 


15651 


1603 




















017020 


102Hi 


1032 


10331 


10361 


lOHOI 


4 All >* M 


10H7I 


10611 


13191 


1320 






13H3I 


13H6I 


13591 


13611 


13731 


13791 


4 fi>4 m 

1 JSlff 


1382* 


1383i 


1 J8Hi 






1831 


20621 


20711 


3691 


39611 


3962 


3963 


j96m 






HLT 


00365b 


1328 


19101 


















INPUT 


003S00 


18611 


21(61 


2H81 


25H9 


2699 


2710 










PESTO 


00260M 


1638* 


1683 


1718 


1811 


1853 


l7bl 


Zll 1 


21 5H 






PEUiN 


0053*42 


2267 


228SI 


2751 


2850 


3051 


3211 


3291 


3326 


3363 


3402 






36H5 




















SOVE 


002562 


16271 


1661 


1700 


179'« 


1821 


1911 


2086 


21 2H 






MOPE 


00H132 


1326 


1981» 


















T.PE 


002336 


1322 


1572» 



















13301 
1J93I 



SEQ 0108 



13351 13381 
1570R 160i« 



JH86 3666 3602 



DZTUG-B 


Tn02/TElb DRIVE 


FUNCTION 


TinER 


fIfiCYll 


30( 1046) 


02-DEC- 


F 9 
77 09 


48 PAGE 


1 1 1 










SEQ Qt 


C2TUGC 






09 146 




CROSS 


REFERENCE 


TRBLE -- 


nflcfio 


NRnES 














INPUT 


111 OS 


9kid 


2M81 


25149 


2699 


2710 




















PESTOR 


111 C£ 

I 1 law 


1 C^Qf 


1717 


1810 


1853 


1961 


2110 


2153 
















PEUINO 


11911 
I lilt 




2761 


2860 


3060 


3211 


3291 


3326 


3363 


3402 


3484 


3566 


3602 


3644 






111 91 

111 


1 <.<.n 

1 DDU 


1699 


1793 


1820 


2085 


2123 


















SETGO 


1 1 71 > 




2291 


2342 


2877 


2897 


2927 


2961 


2967 


2986 


2990 


3017 


3021 


3063 


3069 




mfifi 

JUOO 




3099 


3117 


3123 


3141 


314S 


3151 


3170 


3174 


3178 


3183 


3216 


3226 


3235 




32m 


3298 


333H 


3371 


3M10 


3444 


3463 


3472 


3575 


3611 


3625 










TJnCHK 


n28t 


2162 


2177 


2759 


2778 


2805 


2837 


2869 


2E81 


2910 


2945 


2971 


3002 


3039 


3073 




3103 


3127 


3156 


3187 


3246 


3310 


3346 


3383 


3422 


3448 


3476 


3683 


3633 






TinEON 


11251 


217H 


276H 


2800 


2832 


2854 


2876 


2906 


2941 


2966 


2998 


3036 


3068 


3098 


3122 




31S0 


3182 


32H0 


3306 


3342 


33"'9 


3418 


3443 


3471 


3580 


3630 











SCPTCH 9951 1024 

vlHNnO 10701 2620 

S'.PREG 9951 1136 

%CP'/EC 995» 1163 

*T>PE 995» 1553 



RBS OirOZD 000 



ERRORS DETECTED 0 

CZTUGCCZTUGC SEQ/SOL/NL TOC/DOCsCZTUGC SflL/ML • CZTUGC Pll 
RUN-TIHE H 7 8 SECONDS 
RUN-TiriE RRTIO 440/13=23 6 
CORE USED 8K » 15 PPGES 1 

DOCUrtENT PPGES 109 



■V taz P <I S 

< &8 (V ■•• va qaz N 



G 9 




4 VI 



H 9 



^ ■ ^\ / • ' 



